Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-msg.el @ 122:d2f30a177268 r20-1b14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b14
author cvs
date Mon, 13 Aug 2007 09:26:03 +0200
parents 7d55a9ba150c
children 9b50b4588a93
comparison
equal deleted inserted replaced
121:419db647c998 122:d2f30a177268
178 (gnus-configure-windows ,config t) 178 (gnus-configure-windows ,config t)
179 (set-buffer-modified-p nil)))) 179 (set-buffer-modified-p nil))))
180 180
181 (defun gnus-inews-add-send-actions (winconf buffer article) 181 (defun gnus-inews-add-send-actions (winconf buffer article)
182 (make-local-hook 'message-sent-hook) 182 (make-local-hook 'message-sent-hook)
183 (gnus-add-hook 'message-sent-hook 'gnus-inews-do-gcc nil t) 183 (add-hook 'message-sent-hook 'gnus-inews-do-gcc nil t)
184 (setq message-post-method 184 (setq message-post-method
185 `(lambda (arg) 185 `(lambda (arg)
186 (gnus-post-method arg ,gnus-newsgroup-name))) 186 (gnus-post-method arg ,gnus-newsgroup-name)))
187 (setq message-newsreader (setq message-mailer (gnus-extended-version))) 187 (setq message-newsreader (setq message-mailer (gnus-extended-version)))
188 (message-add-action 188 (message-add-action