diff options
Diffstat (limited to 'gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch')
| -rw-r--r-- | gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch b/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch new file mode 100644 index 0000000000..7a6cb642d0 --- /dev/null +++ b/gnu/packages/patches/emacs-debbugs-keep-patch-subject.patch @@ -0,0 +1,29 @@ +Preserve subject when replying to patch threads. +Upstream status: likely to be in the next release (bug#66330) + +diff --git a/debbugs-gnu.el b/debbugs-gnu.el +index f366fba11d..cd549e364d 100644 +--- a/debbugs-gnu.el ++++ b/debbugs-gnu.el +@@ -1747,6 +1747,12 @@ MERGED is the list of bugs merged with this one." + (format "Re: bug#%d: %s" id (alist-get 'subject status))) + (debbugs-gnu-summary-mode 1))) + ++(defcustom debbugs-gnu-summary-keep-subject ++ (rx "[PATCH" (? (0+ (not (any digit "/]"))) (1+ digit) "/" (1+ digit)) "]") ++ "Regular expression which keeps the original message subject in replies." ++ :version "29.1" ++ :type 'regexp) ++ + (defvar debbugs-gnu-summary-mode-map + (let ((map (make-sparse-keymap))) + (define-key map "C" #'debbugs-gnu-send-control-message) +@@ -1778,6 +1784,8 @@ MERGED is the list of bugs merged with this one." + (cons new new)) + address)))))) + ,@(and debbugs-gnu-subject ++ (not (string-match-p debbugs-gnu-summary-keep-subject ++ debbugs-gnu-subject)) + `((subject ,debbugs-gnu-subject))))))) + + (defun debbugs-gnu-guess-current-id () |