X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/cb2d5b29dbdf0aab7f4804438e53bfa1a4dcd82d..aea4c6ae3a0b470ca16b2b209f8ee344c7b21a94:/packages/debbugs/debbugs-org.el

diff --git a/packages/debbugs/debbugs-org.el b/packages/debbugs/debbugs-org.el
index ecd522d69..71adf1de0 100644
--- a/packages/debbugs/debbugs-org.el
+++ b/packages/debbugs/debbugs-org.el
@@ -195,6 +195,12 @@ returned."
 	;; Do the search.
 	(debbugs-org severities packages))))
 
+;;;###autoload
+(defun debbugs-org-patches ()
+  "List the bug reports that have been marked as containing a patch."
+  (interactive)
+  (debbugs-org nil debbugs-gnu-default-packages nil nil "patch"))
+
 ;;;###autoload
 (defun debbugs-org (severities &optional packages archivedp suppress tags)
   "List all outstanding bugs."