]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix thinko in previous nnmail.el patch
authorLars Ingebrigtsen <larsi@gnus.org>
Mon, 27 Jul 2020 22:51:29 +0000 (00:51 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Mon, 27 Jul 2020 22:51:29 +0000 (00:51 +0200)
* lisp/gnus/nnmail.el (nnmail-check-duplication): Fix thinko in
previous patch -- group-art is a list of pairs, not a pair.

lisp/gnus/nnmail.el

index 729f8e347c7e32e04ee9a18311dc838b1d34bce6..b6308140fc924c8e657b8253d2d4f328b5a563e3 100644 (file)
@@ -1752,9 +1752,11 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details."
        ;; We need to get the unique Gnus group name for this article
        ;; -- there may be identically named groups from several
        ;; backends.
-       (push (cons (gnus-group-prefixed-name (car group-art)
-                                             gnus-command-method)
-                   (cdr group-art))
+       (push (mapcar
+              (lambda (ga)
+                (cons (gnus-group-prefixed-name (car ga) gnus-command-method)
+                      (cdr ga)))
+              group-art)
              nnmail-split-history)
       (delete-region (point-min) (point-max)))))