[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/debbugs 84be38d 055/311: * debbugs-gnu.el (debbugs-gnu-
From: |
Stefan Monnier |
Subject: |
[elpa] externals/debbugs 84be38d 055/311: * debbugs-gnu.el (debbugs-gnu-subject): New defvar. |
Date: |
Sun, 29 Nov 2020 18:41:39 -0500 (EST) |
branch: externals/debbugs
commit 84be38da7a2c634b37e4e3dd297e6399ff627d5a
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>
* debbugs-gnu.el (debbugs-gnu-subject): New defvar.
(debbugs-gnu-select-report): Set it buffer local.
(debbugs-gnu-summary-mode): Use it for adapting subject of replies.
---
ChangeLog | 6 ++++++
debbugs-gnu.el | 14 ++++++++++----
2 files changed, 16 insertions(+), 4 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index ea3da8b..4dc5458 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-07-14 Michael Albinus <michael.albinus@gmx.de>
+
+ * debbugs-gnu.el (debbugs-gnu-subject): New defvar.
+ (debbugs-gnu-select-report): Set it buffer local.
+ (debbugs-gnu-summary-mode): Use it for adapting subject of replies.
+
2011-07-13 Michael Albinus <michael.albinus@gmx.de>
* debbugs.el (debbugs-get-bugs): Weaken syntax for packages (and
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index 5f14e4f..dabb8de 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -591,6 +591,7 @@ The following commands are available:
(tabulated-list-print))
(defvar debbugs-gnu-bug-number nil)
+(defvar debbugs-gnu-subject nil)
(defun debbugs-gnu-current-id (&optional noerror)
(or (cdr (assq 'id (debbugs-gnu-current-status)))
@@ -622,8 +623,10 @@ The following commands are available:
(cons (current-buffer)
(current-window-configuration)))
(with-current-buffer (window-buffer (selected-window))
- (debbugs-gnu-summary-mode 1)
- (set (make-local-variable 'debbugs-gnu-bug-number) id))))
+ (set (make-local-variable 'debbugs-gnu-bug-number) id)
+ (set (make-local-variable 'debbugs-gnu-subject)
+ (format "Re: bug#%d %s" id (cdr (assq 'subject status))))
+ (debbugs-gnu-summary-mode 1))))
(defvar debbugs-gnu-summary-mode-map
(let ((map (make-sparse-keymap)))
@@ -638,7 +641,7 @@ The following commands are available:
\\{debbugs-gnu-summary-mode-map}"
:lighter " Debbugs" :keymap debbugs-gnu-summary-mode-map
(set (make-local-variable 'gnus-posting-styles)
- '((".*"
+ `((".*"
(eval
(with-current-buffer gnus-article-copy
(set (make-local-variable 'message-prune-recipient-rules)
@@ -652,7 +655,10 @@ The following commands are available:
(let ((new (format "%s@debbugs.gnu.org"
(match-string 1 (car address)))))
(cons new new))
- address)))))))))
+ address)))
+ ;; `gnus-posting-styles' is eval'ed after
+ ;; `message-simplify-subject'. So we cannot use m-s-s.
+ (setq subject ,debbugs-gnu-subject)))))))
(defun debbugs-gnu-send-control-message (message &optional reverse)
"Send a control message for the current bug report.
- [elpa] externals/debbugs 7687d6b 017/311: (debbugs-emacs): Display multiple merges prettier., (continued)
- [elpa] externals/debbugs 7687d6b 017/311: (debbugs-emacs): Display multiple merges prettier., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs c3f0eb7 026/311: (debbugs-toggle-sort): Use `debbugs-current-id'., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs bf5b708 034/311: * debbugs-gnu.el (debbugs-tagged): New face., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 49237ca 037/311: (debbugs-emacs): Init the saved bugs on call, not on load., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 73de9fa 038/311: (debbugs-dump-persistency-file): Don't destroy the list while saving it., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs d119900 039/311: * packages/debbugs/debbugs-gnu.el (debbugs-gnu): New group., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 7a12166 041/311: (debbugs-send-control-message): Allow reversing tags., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 3a253e9 044/311: (debbugs-toggle-tag): Save the list of tagged articles immediately., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 1651ba2 049/311: One week is a better period for staleness, I think., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 7dd9887 052/311: * debbugs-gnu.el (debbugs-gnu-get-bugs): Reinsert sorting of ids., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 84be38d 055/311: * debbugs-gnu.el (debbugs-gnu-subject): New defvar.,
Stefan Monnier <=
- [elpa] externals/debbugs 7f4fc6a 070/311: * debbugs-gnu.el (debbugs-gnu-default-suppress-bugs), Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs abc7751 069/311: * debbugs-gnu.el (debbugs-gnu-search): Let-bind, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 90417e5 056/311: * debbugs-gnu.el (debbugs-gnu-send-control-message): Add "pending" etc., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 5129bba 063/311: * debbugs.texi: New file., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 1ef5eb3 059/311: * debbugs-gnu.el (debbugs-gnu-send-control-message): Add "invalid"., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs d7b7072 060/311: * debbugs-gnu.el (debbugs-gnu-show-reports): Add packages to the status bar., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs f347ec7 066/311: (debbugs-gnu-summary-mode): Make sure `gnus-article-copy' is alive., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 17943cc 072/311: * Debbugs.wsdl (ArrayOfArrayOfAnyType), Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 080565c 074/311: * debbugs-gnu.el (debbugs-gnu-search): Add full text search., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 560f17c 080/311: * debbugs.el (debbugs-get-mbox, debbugs-get-bugs): Fix typos in, Stefan Monnier, 2020/11/29