notmuch.el: Make hidden parts advertise how to unhide them.

[notmuch] / notmuch.el

diff --git a/notmuch.el b/notmuch.el
index 0eac1ccbed60efa586cdea6eafa223b2373127ac..de1eb9f1e1781ebc89694cdf50e3ddffeab28c3a 100644 (file)
--- a/notmuch.el
+++ b/notmuch.el
@@ -408,7 +408,7 @@ which this thread was originally shown."
              (overlay-put overlay 'invisible 'notmuch-show-citation)
              (overlay-put overlay 'before-string
                           (concat "[" (number-to-string (count-lines beg-sub (point)))
-                                  " quoted lines.]\n")))))
+                                  "-line citation. Press 'c' to show.]\n")))))
       (if (looking-at "--[ ]?$")
          (let ((sig-lines (count-lines beg-sub end)))
            (if (<= sig-lines notmuch-show-signature-lines-max)
@@ -416,7 +416,7 @@ which this thread was originally shown."
                  (overlay-put (make-overlay beg-sub (+ beg-sub 1))
                               'before-string
                               (concat "[" (number-to-string sig-lines)
-                                      "-line signature.]"))
+                                      "-line signature. Press 's' to show.]"))
                  (overlay-put (make-overlay (+ beg-sub 2) end)
                               'invisible 'notmuch-show-signature)
                  (goto-char end)))))