Mercurial > emacs

diff lisp/gnus/message.el @ 57581:645f020dcc8a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-626 Merge from gnus--rel--5.10 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-54 Update from CVS 2004-10-18 Reiner Steib <Reiner.Steib@gmx.de> * lisp/gnus/mml.el (mml-preview): Use `pop-to-buffer'. * lisp/gnus/message.el (message-goto-mail-followup-to): Insert after "To". (message-carefully-insert-headers): Add comment. * lisp/gnus/gnus-sum.el (gnus-summary-make-menu-bar): Add help texts. * lisp/gnus/gnus-art.el (gnus-button-alist): Improve `gnus-button-handle-library' entry. * lisp/gnus/gnus-art.el (gnus-button-alist): Fixed regexp for manual links. * lisp/gnus/gnus-group.el (gnus-group-get-new-news-this-group): Added doc-string. * lisp/gnus/gnus-start.el (gnus-activate-group): Added doc-string. * lisp/gnus/gnus-art.el (gnus-button-handle-man, gnus-button-alist): Try to handle manual section. * lisp/gnus/imap.el (imap-store-password): New variable. (imap-interactive-login): Use it. Suggested by Mark Plaksin <happy@mcplaksin.org>. * lisp/gnus/gnus-art.el (gnus-button-alist, gnus-header-button-alist): Allow / in mailto URLs. * lisp/gnus/spam.el (spam-directory): Derive from `gnus-directory'. * lisp/gnus/gnus-sum.el (gnus-pick-line-number): Add autoload.
author Miles Bader <miles@gnu.org>
date Mon, 18 Oct 2004 22:23:44 +0000
parents 505c55fe8dc9
children df80d19d7a2e f3ec05478165
line wrap: on
line diff
--- a/lisp/gnus/message.el	Mon Oct 18 20:45:52 2004 +0000
+++ b/lisp/gnus/message.el	Mon Oct 18 22:23:44 2004 +0000
@@ -2629,7 +2629,7 @@
 (defun message-goto-mail-followup-to ()
   "Move point to the Mail-Followup-To header."
   (interactive)
-  (message-position-on-field "Mail-Followup-To" "From"))
+  (message-position-on-field "Mail-Followup-To" "To"))
 
 (defun message-goto-keywords ()
   "Move point to the Keywords header."
@@ -2739,6 +2739,7 @@
   ;; FIXME: Should compare only the address and not the full name.  Comparison
   ;; should be done case-folded (and with `string=' rather than
   ;; `string-match').
+  ;; (mail-strip-quoted-names "Foo Bar <foo@bar>, bla@fasel (Bla Fasel)")
   (dolist (header headers)
     (let* ((header-name (symbol-name (car header)))
            (new-header (cdr header))