Patches between 0.22 and 0.23

Lars Magne Ingebrigtsen <[email protected]> Thu, 01 May 2003 16:17:12 +0200
Newsgroups gmane.emacs.gnus.patches
Message-ID <[email protected]>
Index: gnus/ChangeLog
diff -u gnus/ChangeLog:6.61 gnus/ChangeLog:6.62
--- gnus/ChangeLog:6.61	Wed Apr 30 22:24:11 2003
+++ gnus/ChangeLog	Thu May  1 15:34:33 2003
@@ -1,3 +1,7 @@
+2003-05-01  Simon Josefsson  <[email protected]>
+
+	* GNUS-NEWS: Add prefix limit feature.
+
 2003-04-30  Reiner Steib  <[email protected]>
 
 	* GNUS-NEWS: Added Article Buttons.  Added Upgrading (from Simon
Index: gnus/GNUS-NEWS
diff -u gnus/GNUS-NEWS:6.56 gnus/GNUS-NEWS:6.60
--- gnus/GNUS-NEWS:6.56	Thu May  1 10:02:35 2003
+++ gnus/GNUS-NEWS	Thu May  1 16:07:15 2003
@@ -53,7 +53,7 @@
 
 and point `gnus-picon-databases' to that location.
 
-** If the new option `gnus-treat-body-boundary' is non-nil, a boundary 
+** If the new option `gnus-treat-body-boundary' is `head', a boundary 
 line is drawn at the end of the headers.
 
 ** Retrieval of charters and control messages
@@ -395,6 +395,13 @@
 
 It was aliased to `Y c' (gnus-summary-insert-cached-articles). The new
 function filters out other articles.
+
+** Some limiting commands accept a C-u prefix to negate the match.
+
+If C-u is used on subject, author or extra headers, i.e., `/ s', `/
+a', and `/ x' (gnus-summary-limit-to-{subject,author,extra})
+respectively, the result will be to display all articles that do not
+match the expression.
 
 ** Group names are treated as UTF-8 by default.
 
Index: gnus/lisp/ChangeLog
diff -u gnus/lisp/ChangeLog:6.2325 gnus/lisp/ChangeLog:6.2331
--- gnus/lisp/ChangeLog:6.2325	Thu May  1 14:34:03 2003
+++ gnus/lisp/ChangeLog	Thu May  1 16:15:56 2003
@@ -1,5 +1,30 @@
 2003-05-01 Lars Magne Ingebrigtsen <[email protected]>
 
+	* gnus.el: Oort Gnus v0.23 is released.
+
+2003-05-01  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* spam-stat.el (spam-stat-test-directory): Compare against zero. 
+
+2003-05-01  Trey Jackson <[email protected]>  (tiny change)
+
+	* spam-stat.el (spam-stat-test-directory): Skip 0 length files.
+	
+2003-05-01  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* message.el (message-forward-subject-name-subject): Decode
+	string when forwarding.
+
+2003-05-01  Oystein Viggen  <[email protected]>
+
+	* dgnushack.el (when): Add defadvice.
+
+2003-05-01  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* gnus.el (gnus-version-number): Bump.
+
+2003-05-01 Lars Magne Ingebrigtsen <[email protected]>
+
 	* gnus.el: Oort Gnus v0.22 is released.
 
 2003-05-01 Lars Magne Ingebrigtsen <[email protected]>
Index: gnus/lisp/dgnushack.el
diff -u gnus/lisp/dgnushack.el:6.37 gnus/lisp/dgnushack.el:6.38
--- gnus/lisp/dgnushack.el:6.37	Tue Apr 29 23:53:52 2003
+++ gnus/lisp/dgnushack.el	Thu May  1 14:52:17 2003
@@ -132,6 +132,8 @@
       (autoload 'custom-declare-face "cus-face" nil t)
       (autoload 'cl-compile-time-init "cl-macs" nil t)
       (autoload 'defadvice "advice" nil nil 'macro))
+    (when (eq emacs-minor-version 4)
+      (autoload 'defadvice "advice" nil nil 'macro))
     (autoload 'Info-directory "info" nil t)
     (autoload 'Info-menu "info" nil t)
     (autoload 'annotations-at "annotations")
Index: gnus/lisp/gnus.el
diff -u gnus/lisp/gnus.el:6.175 gnus/lisp/gnus.el:6.176
--- gnus/lisp/gnus.el:6.175	Thu May  1 14:34:04 2003
+++ gnus/lisp/gnus.el	Thu May  1 14:35:22 2003
@@ -286,7 +286,7 @@
   :link '(custom-manual "(gnus)Exiting Gnus")
   :group 'gnus)
 
-(defconst gnus-version-number "0.22"
+(defconst gnus-version-number "0.23"
   "Version number for this version of Gnus.")
 
 (defconst gnus-version (format "Oort Gnus v%s" gnus-version-number)
Index: gnus/lisp/message.el
diff -u gnus/lisp/message.el:6.335 gnus/lisp/message.el:6.336
--- gnus/lisp/message.el:6.335	Thu May  1 09:48:51 2003
+++ gnus/lisp/message.el	Thu May  1 15:13:04 2003
@@ -5858,7 +5858,9 @@
 	  (let ((prefix
 		 (or (message-fetch-field "newsgroups")
 		     (cdr
-		      (mail-header-parse-address (message-fetch-field "from")))
+		      (mail-header-parse-address
+		       (mail-decode-encoded-word-string
+			(message-fetch-field "from"))))
 		     "(nowhere)")))
 	    (if message-forward-decoded-p
 		prefix
Index: gnus/lisp/spam-stat.el
diff -u gnus/lisp/spam-stat.el:6.10 gnus/lisp/spam-stat.el:6.12
--- gnus/lisp/spam-stat.el:6.10	Tue Apr 29 18:12:14 2003
+++ gnus/lisp/spam-stat.el	Thu May  1 16:14:31 2003
@@ -504,7 +504,8 @@
     (with-temp-buffer
       (dolist (f files)
 	(when (and (file-readable-p f)
-		   (file-regular-p f))
+		   (file-regular-p f)
+                   (> (nth 7 (file-attributes f)) 0))
 	  (setq count (1+ count))
 	  (message "Reading %s: %.2f%%" dir (/ count max))
 	  (insert-file-contents f)
@@ -540,7 +541,8 @@
     (with-temp-buffer
       (dolist (f files)
 	(when (and (file-readable-p f)
-		   (file-regular-p f))
+		   (file-regular-p f)
+                   (> (nth 7 (file-attributes f)) 0))
 	  (setq count (1+ count))
 	  (message "Reading %.2f%%, score %.2f%%"
 		   (/ count max) (/ score count))
Index: gnus/texi/gnus-faq.texi
diff -u gnus/texi/gnus-faq.texi:6.14 gnus/texi/gnus-faq.texi:6.15
--- gnus/texi/gnus-faq.texi:6.14	Wed Apr 30 22:39:38 2003
+++ gnus/texi/gnus-faq.texi	Thu May  1 15:13:11 2003
@@ -228,7 +228,7 @@
 Answer: 
 
  Gnus 5.10.0 requires an Emacs version that is greater
- than or equal to Emacs 20.3 or XEmacs 20.1.
+ than or equal to Emacs 20.7 or XEmacs 21.1.
  
 @ifnottex
 @node [1.6],  , [1.5], FAQ 1 - Installation
Index: gnus/texi/gnus.texi
diff -u gnus/texi/gnus.texi:6.503 gnus/texi/gnus.texi:6.504
--- gnus/texi/gnus.texi:6.503	Thu May  1 14:34:05 2003
+++ gnus/texi/gnus.texi	Thu May  1 16:15:57 2003
@@ -33,7 +33,7 @@
 \makeindex
 \begin{document}
 
-\newcommand{\gnusversionname}{Oort Gnus v0.22}
+\newcommand{\gnusversionname}{Oort Gnus v0.23}
 \newcommand{\gnuschaptername}{}
 \newcommand{\gnussectionname}{}
 
@@ -389,7 +389,7 @@
 spool or your mbox file.  All at the same time, if you want to push your
 luck.
 
-This manual corresponds to Oort Gnus v0.22.
+This manual corresponds to Oort Gnus v0.23.
 
 @end ifinfo