emacs: Prefer '[No Subject]' to blank subjects.

[notmuch] / emacs / notmuch-show.el

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 0a945ea048a3b8535b8881084616242b09549943..3a1a8c89e0b76cdfaff40eb31b28fb77cb015dcf 100644 (file)
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -1018,7 +1018,7 @@ buffer."
       (notmuch-show-next-open-message))
 
     ;; Set the header line to the subject of the first open message.
       (notmuch-show-next-open-message))
 
     ;; Set the header line to the subject of the first open message.

-    (setq header-line-format (notmuch-show-strip-re (notmuch-show-get-subject)))
+    (setq header-line-format (notmuch-show-strip-re (notmuch-show-get-pretty-subject)))

 
     (notmuch-show-mark-read)))
 
 
     (notmuch-show-mark-read)))
 


@@ -1250,6 +1250,9 @@ Some useful entries are:
 (defun notmuch-show-get-depth ()
   (notmuch-show-get-prop :depth))
 
 (defun notmuch-show-get-depth ()
   (notmuch-show-get-prop :depth))
 

+(defun notmuch-show-get-pretty-subject ()
+  (notmuch-prettify-subject (notmuch-show-get-subject)))
+

 (defun notmuch-show-set-tags (tags)
   "Set the tags of the current message."
   (notmuch-show-set-prop :tags tags)
 (defun notmuch-show-set-tags (tags)
   "Set the tags of the current message."
   (notmuch-show-set-prop :tags tags)