diff lisp/simple.el @ 4293:bea04dade8af

[xemacs-hg @ 2007-11-28 21:23:55 by aidan] Don't nag about the mail user agent with bug reports, part 1 of 2.
author aidan
date Wed, 28 Nov 2007 21:23:57 +0000
parents 38ef5a6da799
children a78d697ccd2c
line wrap: on
line diff
--- a/lisp/simple.el	Wed Nov 28 21:17:55 2007 +0000
+++ b/lisp/simple.el	Wed Nov 28 21:23:57 2007 +0000
@@ -3433,10 +3433,13 @@
 ;;
 ;; and hope for the best. Not code we want to use, IMO.
 
+(defvar xemacs-default-composefunc-dont-nag nil
+  "Disable the `xemacs-default-composefunc' nagging; for bug reports.")
+
 (defun xemacs-default-composefunc (&rest args) 
   "Warn that the default mail-reading package is heinously underfeatured;
 compose a mail using it, all the same.  "
-  (unless (noninteractive)
+  (unless (or noninteractive xemacs-default-composefunc-dont-nag)
     (warn "
 
 Defaulting to the GNU Emacs-derived `sendmail.el' mail client. This facility,