Commit ac9f0310 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(mail-yank-original): Bind mark-even-if-inactive

around the indentation and citation hooks code.

(mail-send-nonascii): Make the default t.
parent a3cab9f0
...@@ -178,7 +178,9 @@ The functions \\[mail-send-on-exit] or \\[mail-dont-send] select ...@@ -178,7 +178,9 @@ The functions \\[mail-send-on-exit] or \\[mail-dont-send] select
the RMAIL summary buffer before returning, if it exists and this variable the RMAIL summary buffer before returning, if it exists and this variable
is non-nil.") 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. "*Specify whether to allow sending non-ASCII characters in mail.
If t, that means do allow it. nil means don't allow it. If t, that means do allow it. nil means don't allow it.
`query' means ask the user each time. `query' means ask the user each time.
...@@ -1077,7 +1079,8 @@ and don't delete any header fields." ...@@ -1077,7 +1079,8 @@ and don't delete any header fields."
nil nil
(goto-char start) (goto-char start)
(let ((mail-indentation-spaces (if arg (prefix-numeric-value arg) (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 (if mail-citation-hook
(run-hooks 'mail-citation-hook) (run-hooks 'mail-citation-hook)
(if mail-yank-hooks (if mail-yank-hooks
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment