Set higher priority for headers and hidden citation overlays.

Before the patch, message, headers and hidden citation overlays
had zero priority.  All these overlay have `invisible' property.
Emacs documentation says that we should not make assumptions
about which overlay will prevail when they have the same priority
[1].  It happens to work as we need, but we should not rely on
undocumented behavior.

[1] http://www.gnu.org/s/emacs/manual/html_node/elisp/Overlay-Properties.html
This commit is contained in:
Dmitry Kurochkin 2011-05-26 02:10:15 +04:00 committed by Carl Worth
parent 95ef8da294
commit 4a9d0ac147
2 changed files with 4 additions and 1 deletions

View file

@ -753,7 +753,9 @@ current buffer, if possible."
;; message.
(put-text-property message-start message-end :notmuch-message-extent (cons message-start message-end))
(overlay-put (make-overlay headers-start headers-end) 'invisible headers-invis-spec)
(let ((headers-overlay (make-overlay headers-start headers-end)))
(overlay-put headers-overlay 'invisible headers-invis-spec)
(overlay-put headers-overlay 'priority 10))
(overlay-put (make-overlay body-start body-end) 'invisible message-invis-spec)
;; Save the properties for this message. Currently this saves the

View file

@ -156,6 +156,7 @@ insert before the button, probably for indentation."
(add-to-invisibility-spec invis-spec)
(overlay-put overlay 'invisible (list invis-spec message-invis-spec))
(overlay-put overlay 'isearch-open-invisible #'notmuch-wash-region-isearch-show)
(overlay-put overlay 'priority 10)
(overlay-put overlay 'type type)
(goto-char (1+ end))
(save-excursion