Mercurial > hg > xemacs-beta
changeset 2977:0a759f4c4225
[xemacs-hg @ 2005-10-05 04:32:44 by stephent]
Aidan, I'm sick of yer naggin'! :-)
<87achotwly.fsf@tleepslib.sk.tsukuba.ac.jp>
author | stephent |
---|---|
date | Wed, 05 Oct 2005 04:32:45 +0000 |
parents | 0fb57d74601d |
children | 6b89d9014a18 |
files | lisp/ChangeLog lisp/simple.el |
diffstat | 2 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Oct 05 04:11:25 2005 +0000 +++ b/lisp/ChangeLog Wed Oct 05 04:32:45 2005 +0000 @@ -1,3 +1,7 @@ +2005-10-04 Stephen J. Turnbull <stephen@xemacs.org> + + * simple.el (xemacs-default-composefunc): Don't warn when batch. + 2005-10-04 Stephen J. Turnbull <stephen@xemacs.org> * build-report.el: Synch to Adrian's packaged version.
--- a/lisp/simple.el Wed Oct 05 04:11:25 2005 +0000 +++ b/lisp/simple.el Wed Oct 05 04:32:45 2005 +0000 @@ -3417,7 +3417,8 @@ (defun xemacs-default-composefunc (&rest args) "Warn that the default mail-reading package is heinously underfeatured; compose a mail using it, all the same. " - (warn " + (unless (noninteractive) + (warn " Defaulting to the GNU Emacs-derived `sendmail.el' mail client. This facility, while part of base XEmacs, is heinously underfeatured, and not going to get @@ -3431,11 +3432,10 @@ list. Gnus and VM are full-featured and have active user communities. To disable this warning and stick with the old behavior, you can explicitly -initialize `mail-user-agent' to 'sendmail-user-agent . ") +initialize `mail-user-agent' to 'sendmail-user-agent . ")) (setq mail-user-agent 'sendmail-user-agent) (apply (get 'sendmail-user-agent 'composefunc) args)) - (defun xemacs-default-sendfunc (&rest args) "Set `mail-user-agent' to `sendmail-user-agent'; call the send function associated with that package, passing it the supplied arguments. "