emacs: Don't report CLI signals sent by Emacs as errors

[notmuch] / emacs / notmuch-show.el

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 4603f7e5e8319e0e6725ab6e59fca24070cc65b0..83bb9ad5d02af91496f4fdfd28dc84b84c5cf5c9 100644 (file)
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -846,11 +846,18 @@ If HIDE is non-nil then initially hide this part."
     (notmuch-map-text-property beg (point) :notmuch-part
                               (lambda (v) (or v part)))
     ;; Make :notmuch-part front sticky and rear non-sticky so it stays
     (notmuch-map-text-property beg (point) :notmuch-part
                               (lambda (v) (or v part)))
     ;; Make :notmuch-part front sticky and rear non-sticky so it stays

-    ;; applied to the beginning of each line when we indent the message.
+    ;; applied to the beginning of each line when we indent the
+    ;; message.  Since we're operating on arbitrary renderer output,
+    ;; watch out for sticky specs of t, which means all properties are
+    ;; front-sticky/rear-nonsticky.

     (notmuch-map-text-property beg (point) 'front-sticky
     (notmuch-map-text-property beg (point) 'front-sticky

-                              (lambda (v) (pushnew :notmuch-part v)))
+                              (lambda (v) (if (listp v)
+                                              (pushnew :notmuch-part v)
+                                            v)))

     (notmuch-map-text-property beg (point) 'rear-nonsticky
     (notmuch-map-text-property beg (point) 'rear-nonsticky

-                              (lambda (v) (pushnew :notmuch-part v)))))
+                              (lambda (v) (if (listp v)
+                                              (pushnew :notmuch-part v)
+                                            v)))))

 
 (defun notmuch-show-insert-body (msg body depth)
   "Insert the body BODY at depth DEPTH in the current thread."
 
 (defun notmuch-show-insert-body (msg body depth)
   "Insert the body BODY at depth DEPTH in the current thread."


@@ -1529,8 +1536,8 @@ This command is intended to be one of the simplest ways to
 process a thread of email. It works exactly like
 notmuch-show-advance, in that it scrolls through messages in a
 show buffer, except that when it gets to the end of the buffer it
 process a thread of email. It works exactly like
 notmuch-show-advance, in that it scrolls through messages in a
 show buffer, except that when it gets to the end of the buffer it

-archives the entire current thread, (remove the \"inbox\" tag
-from each message), kills the buffer, and displays the next
+archives the entire current thread, (apply changes in
+`notmuch-archive-tags'), kills the buffer, and displays the next

 thread from the search from which this thread was originally
 shown."
   (interactive)
 thread from the search from which this thread was originally
 shown."
   (interactive)