From 94583c74c435bfa1f0815f3025c5e6beab66638d Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Sat, 7 Dec 2019 23:35:24 -0500
Subject: km-magit: Add command for listing tags which contain a revision

---
 lisp/km-magit.el | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'lisp/km-magit.el')

diff --git a/lisp/km-magit.el b/lisp/km-magit.el
index a42b22c..2f8709f 100644
--- a/lisp/km-magit.el
+++ b/lisp/km-magit.el
@@ -740,6 +740,12 @@ category."
              (append existing (list rs))
              keys))))
 
+(defun km/magit-list-containing-tags (rev)
+  (interactive (list (magit-read-branch-or-commit "Revision")))
+  (let ((magit-process-popup-time 0))
+    (magit-run-git-async "for-each-ref" (format "--contains=%s" rev)
+                         "--sort=v:refname" "refs/tags")))
+
 
 ;;; Copy functions
 
-- 
cgit v1.2.3