* cosmetics

This commit is contained in:
djcb 2012-04-16 23:10:16 +03:00
parent 2ac3a63f98
commit bbd55fe787
2 changed files with 3 additions and 3 deletions

View File

@ -415,10 +415,10 @@ using Gnus' `message-mode'."
(plist-get att :file-name) (plist-get att :mime-type))))
;; include the message header if it's set; but not when editing an existing
;; message
;; message.
(unless (eq compose-type 'edit)
(when message-signature
(message-insert-signature)))
(message-insert-signature)))
(if (member compose-type '(new forward))
(message-goto-to)

View File

@ -428,7 +428,7 @@ Seen; if the message is not New/Unread, do nothing."
(goto-char (point-min))
(let ((p (search-forward "\n-- \n" nil t)))
(when p
(add-text-properties p (point-max) '(face mu4e-view-footer-face)))))))
(add-text-properties p (point-max) '(face mu4e-footer-face)))))))
(defvar mu4e-link-map nil
"*internal* A map of some number->url so we can jump to url by number.")