emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] master c36cda1: Tweak minor problem in debbugs.el


From: Michael Albinus
Subject: [elpa] master c36cda1: Tweak minor problem in debbugs.el
Date: Fri, 20 Oct 2017 15:22:55 -0400 (EDT)

branch: master
commit c36cda1e25e4cf95647ad83514207130afeccb18
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Tweak minor problem in debbugs.el
    
    * packages/debbugs/debbugs.el (debbugs-get-status): "mergedwith",
    "blocks" and "blockedby" can also be single numbers.
---
 packages/debbugs/debbugs.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/packages/debbugs/debbugs.el b/packages/debbugs/debbugs.el
index ca0a53b..82bab07 100644
--- a/packages/debbugs/debbugs.el
+++ b/packages/debbugs/debbugs.el
@@ -452,10 +452,12 @@ Example:
            (setcdr y (mapcar
                       (lambda (z) (if (numberp z) (number-to-string z) z))
                       (cdr y))))
-         ;; "mergedwith", "blocks" and "blockedby are strings,
-         ;; containing blank separated bug numbers.
+         ;; "mergedwith", "blocks" and "blockedby" are either numbers
+         ;; or strings, containing blank separated bug numbers.
          (dolist (attribute '(mergedwith blocks blockedby))
            (setq y (assoc attribute (cdr (assoc 'value x))))
+           (when (numberp (cdr y))
+             (setcdr y (list (cdr y))))
            (when (stringp (cdr y))
              (setcdr y (mapcar
                         #'string-to-number (split-string (cdr y) " " t)))))



reply via email to

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