(mail-setup): Insert -- line before .signature file.

1994-07-12 02:47:27 +00:00
parent 8eb6c7da6b
commit a5282b8fe2
1 changed files with 3 additions and 1 deletions
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -198,7 +198,9 @@ actually occur.")
    (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))