[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/debbugs 23a4b78 203/311: Get the correct patch author n
From: |
Stefan Monnier |
Subject: |
[elpa] externals/debbugs 23a4b78 203/311: Get the correct patch author name |
Date: |
Sun, 29 Nov 2020 18:42:12 -0500 (EST) |
branch: externals/debbugs
commit 23a4b783b7f0591ebf1e04331e560288f9ee1e06
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Get the correct patch author name
---
debbugs-gnu.el | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index fd0b501..dd17e83 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -1696,11 +1696,12 @@ If given a prefix, patch in the branch directory
instead."
(defun debbugs-gnu-insert-changelog ()
"Add a ChangeLog from a recently applied patch from a third party."
(interactive)
- (let (from subject patch-subject changelog)
+ (let (from subject patch-subject changelog
+ patch-from)
(gnus-with-article-buffer
(widen)
(goto-char (point-min))
- (setq from (mail-extract-address-components (gnus-fetch-field "from"))
+ (setq from (gnus-fetch-field "from")
subject (gnus-fetch-field "subject"))
;; If it's a patch formatted the right way, extract that data.
(dolist (handle (mapcar 'cdr (gnus-article-mime-handles)))
@@ -1714,6 +1715,8 @@ If given a prefix, patch in the branch directory instead."
(quoted-printable-decode-region (point-min) (point-max))))
(setq patch-subject
(or (gnus-fetch-field "subject") patch-subject))
+ (setq patch-from
+ (or (gnus-fetch-field "from") patch-from))
(goto-char (point-min))
(when (re-search-forward "^[*] " nil t)
(let ((start (match-beginning 0)))
@@ -1722,6 +1725,7 @@ If given a prefix, patch in the branch directory instead."
(forward-line 1))
(setq changelog (buffer-substring
start (line-end-position 0)))))))))
+ (setq from (mail-extract-address-components (or patch-from from)))
(let ((add-log-full-name (car from))
(add-log-mailing-address (cadr from)))
(add-change-log-entry-other-window)
- [elpa] externals/debbugs a812a38 176/311: Minor debbugs fixes, (continued)
- [elpa] externals/debbugs a812a38 176/311: Minor debbugs fixes, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 2188bf8 179/311: Release debbugs 0.9.1., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 7385eb0 180/311: Release debbugs 0.9.2, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs c3fbd58 213/311: Extend arguments of `debbugs-gnu-bugs', plus minor fixes, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 5c66876 207/311: Remove usages of the gnus-with-article-buffer macro, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs a649e51 208/311: Minor fixes in debbugs-gnu.el, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 9094eec 214/311: debbugs-gnu.el: Doc fixes, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 01a01f7 215/311: Release debbugs 0.11, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 69b8627 206/311: Document patching from debbugs, and fix some bugs, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 9e0f1b6 211/311: Bump debbugs version to 0.10, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 23a4b78 203/311: Get the correct patch author name,
Stefan Monnier <=
- [elpa] externals/debbugs 94e859e 219/311: debbugs: Handle Emacs with separate build number, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs a762b83 223/311: Set mouse point in debbugs, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs d8e0199 226/311: Tweak minor problem in debbugs.el, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 3aa755c 224/311: ; Add debbugs-gnu.el TODO item, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 705125d 228/311: Bump debbugs 0.15, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs efa391d 234/311: Add mail command index in debbugs, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 9893851 237/311: * packages/debbugs/debbugs-ug.texi (Control Messages): Fix typos., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 03e8ba4 249/311: * debbugs: Cosmetic changes, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 32fedac 250/311: * packages/debbugs/debbugs.el: Increase Version to 0.18., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 11f53a4 251/311: Fix up patch file names that are absolute, Stefan Monnier, 2020/11/29