From: keiichi Date: Fri, 13 Nov 1998 06:31:00 +0000 (+0000) Subject: (gnus-setup-message): Setup `message-startup-parameter-alist' for starting X-Git-Tag: gnus-6_8-199811302358~33 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d8fe5f1a49cfa829c78da140ed1bb014ebdbdd65;p=elisp%2Fgnus.git- (gnus-setup-message): Setup `message-startup-parameter-alist' for starting `message-mode'. --- diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index 9af23d9..bd88160 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -202,7 +202,11 @@ Thank you for your help in stamping out bugs. (,group gnus-newsgroup-name) (message-header-setup-hook (copy-sequence message-header-setup-hook)) - (message-mode-hook (copy-sequence message-mode-hook))) + (message-mode-hook (copy-sequence message-mode-hook)) + (message-startup-parameter-alist + '((reply-buffer . gnus-copy-article-buffer) + (original-buffer . gnus-original-article-buffer) + (user-agent . Gnus)))) (add-hook 'message-header-setup-hook 'gnus-inews-insert-gcc) (add-hook 'message-header-setup-hook 'gnus-inews-insert-archive-gcc) (add-hook 'message-mode-hook 'gnus-configure-posting-styles)