]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix requesting sparse articles in gnus
authorAndrew G Cohen <cohen@andy.bu.edu>
Tue, 25 Apr 2017 05:13:10 +0000 (13:13 +0800)
committerAndrew G Cohen <cohen@andy.bu.edu>
Tue, 25 Apr 2017 05:13:10 +0000 (13:13 +0800)
* lisp/gnus/gnus-art.el (gnus-request-article-this-buffer): Delete the
sparse article number from the list, not its id.

lisp/gnus/gnus-art.el

index a4ff840f75545690dd709f9bff44071993480faa..9b91f9f85e7603af396655dc367d5b9d1accb165 100644 (file)
@@ -6993,10 +6993,10 @@ If given a prefix, show the hidden text instead."
                   ((memq article gnus-newsgroup-sparse)
                    ;; This is a sparse gap article.
                    (setq do-update-line article)
-                   (setq article (mail-header-id header))
-                   (setq sparse-header (gnus-read-header article))
                    (setq gnus-newsgroup-sparse
-                         (delq article gnus-newsgroup-sparse)))
+                         (delq article gnus-newsgroup-sparse))
+                   (setq article (mail-header-id header))
+                   (setq sparse-header (gnus-read-header article)))
                   ((vectorp header)
                    ;; It's a real article.
                    (setq article (mail-header-id header)))