changeset 98398:39408ed11da9

Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1436
author Miles Bader <miles@gnu.org>
date Tue, 30 Sep 2008 00:48:01 +0000
parents 2a48bb93c83c
children 6b3b02fd9846
files lisp/gnus/ChangeLog lisp/gnus/gnus-art.el lisp/gnus/message.el
diffstat 3 files changed, 21 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Tue Sep 30 00:47:51 2008 +0000
+++ b/lisp/gnus/ChangeLog	Tue Sep 30 00:48:01 2008 +0000
@@ -1,3 +1,8 @@
+2008-09-29  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* gnus-art.el (gnus-article-read-summary-keys): Check if summary window
+	exists.
+
 2008-09-27  Glenn Morris  <rgm@gnu.org>
 
 	* gnus-util.el (mail-header-remove-comments): Autoload it.
@@ -7,12 +12,23 @@
 	* gnus-util.el (gnus-split-references): Strip comments.
 	(gnus-parent-id): Likewise.
 
+2008-09-26  Reiner Steib  <Reiner.Steib@gmx.de>
+
+	* message.el (message-confirm-send): Fix version.
+
+2008-09-25  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* message.el (message-idna-to-ascii-rhs-1): Use
+	mail-extract-address-components rather than mail-header-parse-addresses
+	that is an alias by default to ietf-drums-parse-addresses that does not
+	support non-ASCII names in headers' contents.
+
 2008-09-25  Teodor Zlatanov  <tzz@lifelogs.com>
 
 	* message.el (message-confirm-send): Fixed variable documentation to
 	avoid the "y/n" wording.
 
-2008-09-25  Francis Litterio <flitterio@gmail.com>  (tiny change)
+2008-09-25  Francis Litterio  <flitterio@gmail.com>  (tiny change)
 
 	* message.el (message-set-auto-save-file-name): Save to a different
 	filename so multiple messages (especially drafts) can be recovered.
--- a/lisp/gnus/gnus-art.el	Tue Sep 30 00:47:51 2008 +0000
+++ b/lisp/gnus/gnus-art.el	Tue Sep 30 00:48:01 2008 +0000
@@ -6378,6 +6378,7 @@
 				      (point))))
 		(when (and (not not-restore-window)
 			   new-sum-point
+			   (window-live-p win)
 			   (with-current-buffer (window-buffer win)
 			     (eq major-mode 'gnus-summary-mode)))
 		  (set-window-point win new-sum-point)
--- a/lisp/gnus/message.el	Tue Sep 30 00:47:51 2008 +0000
+++ b/lisp/gnus/message.el	Tue Sep 30 00:48:01 2008 +0000
@@ -445,7 +445,7 @@
   "When non-nil, ask for confirmation when sending a message."
   :group 'message-sending
   :group 'message-mail
-  :version "22.3" ;; No Gnus
+  :version "23.1" ;; No Gnus
   :link '(custom-manual "(message)Sending Variables")
   :type 'boolean)
 
@@ -5633,7 +5633,8 @@
 		(mapcar (lambda (rhs) (or (cadr (split-string rhs "@")) ""))
 			(mapcar 'downcase
 				(mapcar
-				 'car (mail-header-parse-addresses field))))))
+				 'cadr
+				 (mail-extract-address-components field t))))))
 	(setq ace (if (string-match "\\`[[:ascii:]]+\\'" rhs)
 		      rhs
 		    (downcase (idna-to-ascii rhs))))