[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 9ef4325: * debbugs-gnu.el (debbugs-gnu--parse-mail): Pacif

From: Michael Albinus
Subject: [elpa] master 9ef4325: * debbugs-gnu.el (debbugs-gnu--parse-mail): Pacify byte compiler.
Date: Sun, 11 Oct 2020 04:37:36 -0400 (EDT)

branch: master
commit 9ef4325b319b6ce8fa60311cf226088a89a837d0
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    * debbugs-gnu.el (debbugs-gnu--parse-mail): Pacify byte compiler.
    (debbugs-gnu-log-edit-done): Fix typo.
 packages/debbugs/debbugs-gnu.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 5084b61..ceddc00 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -2680,6 +2680,9 @@ If SELECTIVELY, query the user before applying the patch."
 (defun debbugs-gnu--parse-mail (string)
   (let* ((mail-extr-ignore-single-names nil)
         (mail-extr-ignore-realname-equals-mailbox-name nil))
+    ;; Pacify byte compiler.
+    (ignore
+     mail-extr-ignore-single-names 
     (mail-extract-address-components string)))
 (defun debbugs-gnu-log-edit-done ()
@@ -2687,7 +2690,7 @@ If SELECTIVELY, query the user before applying the patch."
   (let ((author (mail-fetch-field "Author")))
     (when (> (length author) 0)
-      (let ((from (debbugs-gnus--parse-mail author)))
+      (let ((from (debbugs-gnu--parse-mail author)))
        (when (and (zerop (debbugs-gnu-find-contributor
                           (let ((bits (split-string (car from))))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]