changeset 8216:1f1387385ac6

(mail-setup): Insert -- line before .signature file.
author Richard M. Stallman <rms@gnu.org>
date Tue, 12 Jul 1994 02:47:27 +0000
parents 767bef8ec35b
children a09642334f69
files lisp/mail/sendmail.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Tue Jul 12 02:16:57 1994 +0000
+++ b/lisp/mail/sendmail.el	Tue Jul 12 02:47:27 1994 +0000
@@ -198,7 +198,9 @@
     (if to (setq to (point)))
     (cond ((eq mail-signature t)
 	   (if (file-exists-p "~/.signature")
-	       (insert-file-contents "~/.signature")))
+	       (progn
+		 (insert "\n\n-- \n")
+		 (insert-file-contents "~/.signature"))))
 	  (mail-signature
 	   (insert mail-signature)))
     (goto-char (point-max))