2003-01-01 Raymond Scholz <ray-2002@zonix.de>
authorLars Magne Ingebrigtsen <larsi@gnus.org>
Wed, 1 Jan 2003 21:11:00 +0000 (21:11 +0000)
committerLars Magne Ingebrigtsen <larsi@gnus.org>
Wed, 1 Jan 2003 21:11:00 +0000 (21:11 +0000)
* message.el (message-signature-insert-empty-line): New variable.

lisp/ChangeLog
lisp/message.el
texi/message.texi

index dedba6b..64adeb3 100644 (file)
@@ -1,3 +1,7 @@
+2003-01-01  Raymond Scholz  <ray-2002@zonix.de>
+
+       * message.el (message-signature-insert-empty-line): New variable. 
+
 2002-12-30  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * message.el: Renamed functions and variables: "xpost" ->
index d07d98a..c287b75 100644 (file)
@@ -800,6 +800,12 @@ If nil, don't insert a signature."
   :type '(choice file (const :tags "None" nil))
   :group 'message-insertion)
 
+;;;###autoload
+(defcustom message-signature-insert-empty-line t
+  "*If non-nil, insert an empty line before the signature separator."
+  :type 'boolean
+  :group 'message-insertion)
+
 (defcustom message-distribution-function nil
   "*Function called to return a Distribution header."
   :group 'message-news
@@ -2677,7 +2683,9 @@ Prefix arg means justify as well."
       ;; Insert the signature.
       (unless (bolp)
        (insert "\n"))
-      (insert "\n-- \n")
+      (when message-signature-insert-empty-line
+       (insert "\n"))
+      (insert "-- \n")
       (if (eq signature t)
          (insert-file-contents message-signature-file)
        (insert signature))
index ef4e53f..85f3e7b 100644 (file)
@@ -1605,6 +1605,11 @@ If this variable is @code{nil}, no signature will be inserted at all.
 File containing the signature to be inserted at the end of the buffer.
 The default is @file{~/.signature}.
 
+@item message-signature-insert-empty-line
+@vindex message-signature-insert-empty-line
+If @code{t} (the default value) an empty line is inserted before the
+signature separator.
+
 @end table
 
 Note that RFC1036bis says that a signature should be preceded by the three