diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-02-08 17:51:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-02-08 17:51:57 +0000 |
| commit | de3a72f68f75138dca15623dd03e39f9320405a1 (patch) | |
| tree | b470aada13b781e8e0a0a55cb9f445edb240d313 | |
| parent | f2d2dbfe1c98dace35d9e92bfccb93067b2707e8 (diff) | |
| download | emacs-de3a72f68f75138dca15623dd03e39f9320405a1.tar.gz | |
(mail-signature): Insert a `-- ' line.
| -rw-r--r-- | lisp/mail/sendmail.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index ed223976507..4325ce4950f 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -643,7 +643,7 @@ the user from the mailer." (search-forward (concat "\n" mail-header-separator "\n"))) (defun mail-signature (atpoint) - "Sign letter with contents of `mail-signature-file'. + "Sign letter with contents of the file `~/.signature'. Prefix arg means put contents at point." (interactive "P") (save-excursion @@ -653,7 +653,7 @@ Prefix arg means put contents at point." (end-of-line) (or atpoint (delete-region (point) (point-max))) - (insert "\n\n") + (insert "\n\n-- \n") (insert-file-contents (expand-file-name "~/.signature")))) (defun mail-fill-yanked-message (&optional justifyp) |