X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-sum.el;h=1bb146a28218774930a8c58825ff47e56860ddcc;hb=5847ba88965e2bccdd94206ba7d4742c10bb8d11;hp=a4b341f3a03d762e397336f3dec5b39202ec6f09;hpb=04182e95fe9d71ea57d96059242119c4a151054d;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index a4b341f..1bb146a 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -4078,8 +4078,7 @@ If READ-ALL is non-nil, all articles in the group are selected."
 
 (defun gnus-update-marks ()
   "Enter the various lists of marked articles into the newsgroup info list."
-  (let ((types (gnus-delete-alist 'cached
-				  (copy-sequence gnus-article-mark-lists)))
+  (let ((types gnus-article-mark-lists)
 	(info (gnus-get-info gnus-newsgroup-name))
 	(uncompressed '(score bookmark killed))
 	type list newmarked symbol)