From: yamaoka Date: Tue, 21 Jan 2003 05:43:48 +0000 (+0000) Subject: Synch with Oort Gnus. X-Git-Tag: t-gnus-6_15_14-00-quimby~1 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3aec44ddbe35ca75d2b56fc66d33e351b517b295;p=elisp%2Fgnus.git- Synch with Oort Gnus. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 46e4a9a..2e5d370 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2003-01-21 Lars Magne Ingebrigtsen + + * message.el (message-send-hook): Doc fix. + + * gnus-win.el (gnus-buffer-configuration): Display article + instead of article-copy when `reply'. + 2003-01-21 Jesper Harder * gnus.el (gnus-format): Change customize group to gnus. diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index f6d452a..f7eafe9 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -6032,7 +6032,8 @@ If EXCLUDE-GROUP, do not go to this group." (progn (while arts (when (or (and undownloaded - (memq (car arts) gnus-newsgroup-undownloaded)) + (memq (car arts) + gnus-newsgroup-undownloaded)) (gnus-data-unread-p (car arts))) (setq result (car arts) arts nil)) diff --git a/lisp/gnus-win.el b/lisp/gnus-win.el index c84a42c..ab6fb9c 100644 --- a/lisp/gnus-win.el +++ b/lisp/gnus-win.el @@ -123,7 +123,7 @@ used to display Gnus windows." (post 1.0 point))) (reply (vertical 1.0 - (article-copy 0.5) + (article 0.5) (message 1.0 point))) (forward (vertical 1.0 diff --git a/lisp/message.el b/lisp/message.el index ecea126..05a3ccc 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -1385,18 +1385,23 @@ candidates: The cdr of each entry is a function for applying the face to a region.") (defcustom message-send-hook nil - "Hook run before sending messages." + "Hook run before sending messages. +This hook is run quite early when sending." :group 'message-various :options '(ispell-message) :type 'hook) (defcustom message-send-mail-hook nil - "Hook run before sending mail messages." + "Hook run before sending mail messages. +This hook is run very late -- just before the message is sent as +mail." :group 'message-various :type 'hook) (defcustom message-send-news-hook nil - "Hook run before sending news messages." + "Hook run before sending news messages. +This hook is run very late -- just before the message is sent as +news." :group 'message-various :type 'hook) diff --git a/texi/message-ja.texi b/texi/message-ja.texi index ddfac80..d416836 100644 --- a/texi/message-ja.texi +++ b/texi/message-ja.texi @@ -1859,11 +1859,13 @@ gnus $B$,F0:n$7$F$$$J$$$H$-$K(B Message $B$,%P%C%U%!$r<+F0J]B8$9$k%G%#%l%/%H% @item message-send-mail-hook @vindex message-send-mail-hook -$B%a!<%k%a%C%;!<%8$rAw$kA0$Ko$KCY$$;~(B +$B4|(B - $B%a%C%;!<%8$,%a!<%k$H$7$FA0(B -- $B$Ko$KCY$$(B +$B;~4|(B - $B%a%C%;!<%8$,%K%e!<%9$H$7$FA0(B -- $B$K