Hi Maxim, On Wed, 20 Sep 2023 at 14:13, Maxim Cournoyer <maxim.courno...@gmail.com> wrote:
>> (define-key gnus-article-mode-map "R" >> #'(lambda () >> "Start composing a reply mail to the current message. >> The original article will be yanked, see >> `gnus-summary-wide-reply-with-original'." > > This comes stock with Gnus (used by Emacs-Debbugs); I just enter 'S W' > (capitalized S followed by capitalized W) to send a wide reply (wide > replies to keep the bug in CC as well as all participants subscribed). > To reply privately to a single participant you could use just the 'R' > Gnus binding. Yeah, I rebind ’S W’ to ’R’ and drop the private reply to a single participant that I never use. That’s to be uniform with Emacs-Notmuch and ’R’ fits better my muscle memory for wide reply. Anyway. The interesting part here is the stash part, I guess. Maybe an advice around gnus-summary-wide-reply-with-original would be better. When I start the wide reply, it extracts the Debbugs-ID number (e.g., 12345) and push "https://issues.guix.gnu.org/issue/12345" to the kill ring. Then I can easily yank it somewhere in the message for reference. Well, it is an helper when doing some triage of old bugs. For example, it eases to type this: --8<---------------cut here---------------start------------->8--- Hi, This bug#30434 [1] is old… blabla… 1: https://issues.guix.gnu.org/issue/30434 --8<---------------cut here---------------end--------------->8--- Similarly, I have another helper that I have often used from Debbugs (gnus) Summary. --8<---------------cut here---------------start------------->8--- (defmacro defun-bug->url (name url &optional docstring) "Macro returning yankage #bug URL. The `interactive' function that the macro returns is then referred by NAME. Please provide a DOCSTRING." (let ((fun (intern (symbol-name name))) (doc (concat docstring "\n\n" (format "Yankable result: `%sNUMBER'." url)))) `(defun ,fun (number) ,doc (interactive (list (progn (when (not (boundp 'debbugs-gnu-bug-number)) (setq debbugs-gnu-bug-number -2)) (read-string (format "Bug number (%s): " debbugs-gnu-bug-number) nil nil debbugs-gnu-bug-number)))) (let ((str (format "%s%s" ,url number))) (kill-new str) (when current-prefix-arg (browse-url str)) (message (format "%s killed." str)))))) (defun-bug->url my/guix-issues "https://issues.guix.gnu.org/issue/" "Add URL of bug NUMBER to `kill-ring'.") (defun-bug->url my/guix-debbugs "https://debbugs.gnu.org/cgi/bugreport.cgi?bug=" "Add (old) URL of bug NUMBER to `kill-ring'.") --8<---------------cut here---------------end--------------->8--- Well, I remember Ludo also shared [1] some of their helper. And Joshua Branson worked [2] about some guix-debbugs.el. Maybe it would be worth to collect these various simple helpers and put them in the Cookbook or else. Because, Debbugs has many annoyances but one best advantage is just being email, and as Chris Wellons said: I’m now understanding for the first time why all those old fogey hackers like to use e-mail for everything: mailing lists, software patches, bug reporting, etc. E-mail a user interface agnostic system, giving everyone their own choice. The tricky part is setting up a decent interface to it. https://nullprogram.com/blog/2013/09/03/ Cheers, simon 1: Re: debbugs-guix.el helper function Ludovic Courtès <l...@gnu.org> Fri, 07 Oct 2022 11:47:38 +0200 id:87ilkwc6dh....@gnu.org https://lists.gnu.org/archive/html/guix-devel/2022-10 https://yhetil.org/guix/87ilkwc6dh....@gnu.org 2: https://issues.guix.gnu.org/issue/56987