[AC21.5] I'm not listening so don't even try to nag
APPROVE COMMIT 21.5
Don't issue paternalistic warnings in -batch mode.
Index: lisp/ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v
retrieving revision 1.678
diff -u -U0 -r1.678 ChangeLog
--- lisp/ChangeLog 5 Oct 2005 04:11:24 -0000 1.678
+++ lisp/ChangeLog 5 Oct 2005 04:24:25 -0000
＠＠ -0,0 +1,4 ＠＠
+2005-10-04 Stephen J. Turnbull <stephen(a)xemacs.org>
+
+ * simple.el (xemacs-default-composefunc): Don't warn when batch.
+
Index: lisp/simple.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/simple.el,v
retrieving revision 1.51
diff -u -r1.51 simple.el
--- lisp/simple.el 10 May 2005 17:35:58 -0000 1.51
+++ lisp/simple.el 5 Oct 2005 04:24:39 -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. "
--
Graduate School of Systems and Information Engineering University of Tsukuba
http://turnbull.sk.tsukuba.ac.jp/ Tennodai 1-1-1 Tsukuba 305-8573 JAPAN
Economics of Information Communication and Computation Systems
Experimental Economics, Microeconomic Theory, Game Theory