aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrew G Cohen2017-04-25 13:13:10 +0800
committerAndrew G Cohen2017-04-25 13:13:10 +0800
commit46dafe4103d1d24a9ec9b3a7a561829bcd5807aa (patch)
treecbf70510e174dd3458e7de3fb4aab65051bace75
parent622c24a2b75a564b9861fc3ca7a7878741e8568d (diff)
downloademacs-46dafe4103d1d24a9ec9b3a7a561829bcd5807aa.tar.gz
emacs-46dafe4103d1d24a9ec9b3a7a561829bcd5807aa.zip
Fix requesting sparse articles in gnus
* lisp/gnus/gnus-art.el (gnus-request-article-this-buffer): Delete the sparse article number from the list, not its id.
-rw-r--r--lisp/gnus/gnus-art.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index a4ff840f755..9b91f9f85e7 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -6993,10 +6993,10 @@ If given a prefix, show the hidden text instead."
6993 ((memq article gnus-newsgroup-sparse) 6993 ((memq article gnus-newsgroup-sparse)
6994 ;; This is a sparse gap article. 6994 ;; This is a sparse gap article.
6995 (setq do-update-line article) 6995 (setq do-update-line article)
6996 (setq article (mail-header-id header))
6997 (setq sparse-header (gnus-read-header article))
6998 (setq gnus-newsgroup-sparse 6996 (setq gnus-newsgroup-sparse
6999 (delq article gnus-newsgroup-sparse))) 6997 (delq article gnus-newsgroup-sparse))
6998 (setq article (mail-header-id header))
6999 (setq sparse-header (gnus-read-header article)))
7000 ((vectorp header) 7000 ((vectorp header)
7001 ;; It's a real article. 7001 ;; It's a real article.
7002 (setq article (mail-header-id header))) 7002 (setq article (mail-header-id header)))