branch: master
commit 7a63b77516fc953441c619a0fe15acf7eb8967af
Author: Michael Albinus <michael.albi...@gmx.de>
Commit: Michael Albinus <michael.albi...@gmx.de>
Add debbugs-*-tagged commands
* packages/debbugs/debbugs-gnu.el (debbugs-gnu-tagged):
* packages/debbugs/debbugs-org.el (debbugs-org-tagged): New defuns.
* packages/debbugs/debbugs-ug.texi (Retrieving Bugs):
Add `debbugs-gnu-tagged' and `debbugs-org-tagged'.
---
packages/debbugs/debbugs-gnu.el | 12 +++++
packages/debbugs/debbugs-org.el | 14 +++++
packages/debbugs/debbugs-ug.info | 107 +++++++++++++++++++++------------------
packages/debbugs/debbugs-ug.texi | 12 +++++
4 files changed, 97 insertions(+), 48 deletions(-)
diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 303b625..8941869 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -140,6 +140,12 @@
;; `debbugs-gnu-default-packages', and tagged with "patch". This is
;; useful for bug triages.
+;; Another special command is
+;;
+;; M-x debbugs-gnu-tagged
+
+;; This command shows just the locally tagged bugs.
+
;; Finally, if you simply want to list some bugs with known bug
;; numbers, call the command
;;
@@ -606,6 +612,12 @@ depend on PHRASE being a string, or nil. See Info node
(debbugs-gnu nil debbugs-gnu-default-packages nil nil "patch"))
;;;###autoload
+(defun debbugs-gnu-tagged ()
+ "List the bug reports that have been tagged locally."
+ (interactive)
+ (debbugs-gnu '("tagged")))
+
+;;;###autoload
(defun debbugs-gnu (severities &optional packages archivedp suppress tags)
"List all outstanding bugs."
(interactive
diff --git a/packages/debbugs/debbugs-org.el b/packages/debbugs/debbugs-org.el
index 456460e..dd69438 100644
--- a/packages/debbugs/debbugs-org.el
+++ b/packages/debbugs/debbugs-org.el
@@ -99,6 +99,12 @@
;; `debbugs-gnu-default-packages', and tagged with "patch". This is
;; useful for bug triages.
+;; Another special command is
+;;
+;; M-x debbugs-org-tagged
+
+;; This command shows just the locally tagged bugs.
+
;; Finally, if you simply want to list some bugs with known bug
;; numbers, call the command
;;
@@ -164,6 +170,14 @@ marked as \"client-side filter\"."
(call-interactively 'debbugs-gnu-patches)))
;;;###autoload
+(defun debbugs-org-tagged ()
+ "List the bug reports that have been tagged locally."
+ (interactive)
+ (cl-letf (((symbol-function 'debbugs-gnu-show-reports)
+ #'debbugs-org-show-reports))
+ (call-interactively 'debbugs-gnu-tagged)))
+
+;;;###autoload
(defun debbugs-org ()
"List all outstanding bugs."
(interactive)
diff --git a/packages/debbugs/debbugs-ug.info b/packages/debbugs/debbugs-ug.info
index 0d3b124..06519cb 100644
--- a/packages/debbugs/debbugs-ug.info
+++ b/packages/debbugs/debbugs-ug.info
@@ -155,6 +155,15 @@ prefix.
*note Presenting Bugs:: for the presentation of the results.
+ -- Command: debbugs-gnu-tagged
+ -- Command: debbugs-org-tagged
+
+ The commands 'debbugs-gnu-tagged' and 'debbugs-org-tagged' show
+ all bugs tagged locally. This list is useful for keeping bugs
+ you are currently working on.
+
+ *note Presenting Bugs:: for the presentation of the results.
+
-- User Option: debbugs-show-progress
If this user option is non-'nil', there is a progress report when
@@ -715,10 +724,12 @@ Command Index
* debbugs-gnu-patches: Retrieving Bugs. (line 86)
* debbugs-gnu-pick-commits: Posting Patches. (line 16)
* debbugs-gnu-search: Searching Bugs. (line 15)
+* debbugs-gnu-tagged: Retrieving Bugs. (line 96)
* debbugs-org: Retrieving Bugs. (line 17)
* debbugs-org-bugs: Retrieving Bugs. (line 70)
* debbugs-org-patches: Retrieving Bugs. (line 87)
* debbugs-org-search: Searching Bugs. (line 16)
+* debbugs-org-tagged: Retrieving Bugs. (line 97)
File: debbugs-ug.info, Node: Variable Index, Next: Key Index, Prev: Command
Index, Up: Top
@@ -747,7 +758,7 @@ Variable Index
* debbugs-gnu-suppress-closed: Tabulated Lists. (line 79)
* debbugs-gnu-trunk-directory: Applying Patches. (line 18)
* debbugs-org-severity-priority: TODO Items. (line 10)
-* debbugs-show-progress: Retrieving Bugs. (line 96)
+* debbugs-show-progress: Retrieving Bugs. (line 105)
File: debbugs-ug.info, Node: Key Index, Next: Mail Command Index, Prev:
Variable Index, Up: Top
@@ -1129,52 +1140,52 @@ Debbugs control mailserver commands
Tag Table:
Node: Top1097
Node: Retrieving Bugs2704
-Node: Searching Bugs7071
-Ref: Searching Bugs-Footnote-111621
-Ref: Searching Bugs-Footnote-211709
-Node: Presenting Bugs11800
-Node: Tabulated Lists12462
-Node: TODO Items16301
-Node: Control Messages17622
-Node: Applying Patches21139
-Node: Posting Patches22529
-Node: Customizing debbugs-gnu-pick-commits25014
-Node: Minor Mode25714
-Node: Command Index26990
-Node: Variable Index27850
-Node: Key Index29366
-Node: Mail Command Index31074
-Ref: Mail Command Index: reassign31227
-Ref: Mail Command Index: reopen31993
-Ref: Mail Command Index: found33147
-Ref: Mail Command Index: notfound34228
-Ref: Mail Command Index: fixed34637
-Ref: Mail Command Index: notfixed35083
-Ref: Mail Command Index: submitter35706
-Ref: Mail Command Index: forwarded36100
-Ref: Mail Command Index: notforwarded36718
-Ref: Mail Command Index: retitle36919
-Ref: Mail Command Index: severity37303
-Ref: Mail Command Index: clone37634
-Ref: Mail Command Index: merge38398
-Ref: Mail Command Index: forcemerge39785
-Ref: Mail Command Index: unmerge40229
-Ref: Mail Command Index: tags40932
-Ref: Mail Command Index: block41998
-Ref: Mail Command Index: unblock42035
-Ref: Mail Command Index: close42520
-Ref: Mail Command Index: package43170
-Ref: Mail Command Index: owner43782
-Ref: Mail Command Index: noowner44145
-Ref: Mail Command Index: archive44318
-Ref: Mail Command Index: unarchive44459
-Ref: Mail Command Index: #44752
-Ref: Mail Command Index: quit45012
-Ref: Mail Command Index: stop45019
-Ref: Mail Command Index: thank45026
-Ref: Mail Command Index: thanks45034
-Ref: Mail Command Index: thankyou45043
-Ref: Mail Command Index: thank you45054
-Ref: Mail Command Index: --45066
+Node: Searching Bugs7376
+Ref: Searching Bugs-Footnote-111926
+Ref: Searching Bugs-Footnote-212014
+Node: Presenting Bugs12105
+Node: Tabulated Lists12767
+Node: TODO Items16606
+Node: Control Messages17927
+Node: Applying Patches21444
+Node: Posting Patches22834
+Node: Customizing debbugs-gnu-pick-commits25319
+Node: Minor Mode26019
+Node: Command Index27295
+Node: Variable Index28297
+Node: Key Index29813
+Node: Mail Command Index31521
+Ref: Mail Command Index: reassign31674
+Ref: Mail Command Index: reopen32440
+Ref: Mail Command Index: found33594
+Ref: Mail Command Index: notfound34675
+Ref: Mail Command Index: fixed35084
+Ref: Mail Command Index: notfixed35530
+Ref: Mail Command Index: submitter36153
+Ref: Mail Command Index: forwarded36547
+Ref: Mail Command Index: notforwarded37165
+Ref: Mail Command Index: retitle37366
+Ref: Mail Command Index: severity37750
+Ref: Mail Command Index: clone38081
+Ref: Mail Command Index: merge38845
+Ref: Mail Command Index: forcemerge40232
+Ref: Mail Command Index: unmerge40676
+Ref: Mail Command Index: tags41379
+Ref: Mail Command Index: block42445
+Ref: Mail Command Index: unblock42482
+Ref: Mail Command Index: close42967
+Ref: Mail Command Index: package43617
+Ref: Mail Command Index: owner44229
+Ref: Mail Command Index: noowner44592
+Ref: Mail Command Index: archive44765
+Ref: Mail Command Index: unarchive44906
+Ref: Mail Command Index: #45199
+Ref: Mail Command Index: quit45459
+Ref: Mail Command Index: stop45466
+Ref: Mail Command Index: thank45473
+Ref: Mail Command Index: thanks45481
+Ref: Mail Command Index: thankyou45490
+Ref: Mail Command Index: thank you45501
+Ref: Mail Command Index: --45513
End Tag Table
diff --git a/packages/debbugs/debbugs-ug.texi b/packages/debbugs/debbugs-ug.texi
index 8121f7b..6ac095b 100644
--- a/packages/debbugs/debbugs-ug.texi
+++ b/packages/debbugs/debbugs-ug.texi
@@ -175,6 +175,18 @@ This is useful for bug triages.
@ref{Presenting Bugs} for the presentation of the results.
@end deffn
+
+@deffn {Command} debbugs-gnu-tagged
+@deffnx {Command} debbugs-org-tagged
+
+The commands @code{debbugs-gnu-tagged} and @code{debbugs-org-tagged}
+show all bugs tagged locally. This list is useful for keeping bugs
+you are currently working on.
+
+@ref{Presenting Bugs} for the presentation of the results.
+@end deffn
+
+
@defopt debbugs-show-progress
If this user option is non-@code{nil}, there is a progress report when
