X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;ds=sidebyside;f=emacs%2Fnotmuch-mua.el;h=9fbb94a668342f06821597d8d4c50fe509fa9ef4;hb=9b85872ed4526688a6195cfa8af19be20ed869c2;hp=c7a9aee0aa67b471e7a5c346f9bf0297652dfd51;hpb=e247ae47c10e8f584b7256eef55a5d722f45c0b3;p=notmuch

diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el
index c7a9aee0..9fbb94a6 100644
--- a/emacs/notmuch-mua.el
+++ b/emacs/notmuch-mua.el
@@ -98,11 +98,16 @@ list."
 			      collect header)))
     (message-sort-headers)
     (message-hide-headers)
+    ;; insert the message body - but put it in front of the signature
+    ;; if one is present
     (goto-char (point-max))
+    (if (re-search-backward "-- " nil t)
+	  (forward-line -1)
+      (goto-char (point-max)))
     (insert body))
-    (set-buffer-modified-p nil)
+  (set-buffer-modified-p nil)
 
-    (message-goto-body))
+  (message-goto-body))
 
 (defun notmuch-mua-forward-message ()
   (message-forward)