Mercurial > hg > xemacs-beta

diff lisp/gnus/gnus-sum.el @ 155:43dd3413c7c7 r20-3b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents 25f70ba0133c
children 0132846995bd
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el	Mon Aug 13 09:38:27 2007 +0200
+++ b/lisp/gnus/gnus-sum.el	Mon Aug 13 09:39:39 2007 +0200
@@ -618,7 +618,7 @@
   :type 'hook)
 
 (defcustom gnus-parse-headers-hook
-  (list 'gnus-decode-rfc1522)
+  (list 'gnus-hack-decode-rfc1522 'gnus-decode-rfc1522)
   "*A hook called before parsing the headers."
   :group 'gnus-various
   :type 'hook)
@@ -6052,7 +6052,7 @@
 		      (mail-header-id (car thread))))
 		(progn
 		  (setq gnus-newsgroup-reads
-			(delq number gnus-newsgroup-unreads))
+			(delq number gnus-newsgroup-reads))
 		  t))))
 	  ;; Nope, invisible article.
 	  0