changeset 19440:797637e1e880

(mail-yank-original): Bind mark-even-if-inactive around the indentation and citation hooks code. (mail-send-nonascii): Make the default t.
author Richard M. Stallman <rms@gnu.org>
date Wed, 20 Aug 1997 02:06:31 +0000
parents 854e48d82a01
children 2e2b54ae9b9d
files lisp/mail/sendmail.el
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Tue Aug 19 19:48:40 1997 +0000
+++ b/lisp/mail/sendmail.el	Wed Aug 20 02:06:31 1997 +0000
@@ -178,7 +178,9 @@
 the RMAIL summary buffer before returning, if it exists and this variable
 is non-nil.")
 
-(defvar mail-send-nonascii 'query
+;; I find that this happens so often, for innocent reasons,
+;; that it is not acceptable to bother the user about it -- rms.
+(defvar mail-send-nonascii t
   "*Specify whether to allow sending non-ASCII characters in mail.
 If t, that means do allow it.  nil means don't allow it.
 `query' means ask the user each time.
@@ -1077,7 +1079,8 @@
 	    nil
 	  (goto-char start)
 	  (let ((mail-indentation-spaces (if arg (prefix-numeric-value arg)
-					   mail-indentation-spaces)))
+					   mail-indentation-spaces))
+		(mark-even-if-inactive t))
 	    (if mail-citation-hook
 		(run-hooks 'mail-citation-hook)
 	      (if mail-yank-hooks