debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-22 02:48:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Rename notmuch-show-headers to notmuch-message-headers

Browse source 
And similarly for notmuch-show-headers-visible to
notmuch-message-headers-visible.

I've never liked notmuch-show as a namespace prefix, but it looks
especially bad when it appears as "Notmuch Show Headers Visible" in
the customize buffer. Give nicer names to these variables which are
exported for user manipulation.
This commit is contained in:
Carl Worth 2010-04-24 06:11:57 -07:00
parent 54ec603bb4
commit a88d1d277b
1 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
emacs/notmuch-show.el
View file

@ -37,21 +37,21 @@
(declare-function notmuch-select-tag-with-completion "notmuch" (prompt &rest search-terms)) (declare-function notmuch-select-tag-with-completion "notmuch" (prompt &rest search-terms))
(declare-function notmuch-search-show-thread "notmuch" nil) (declare-function notmuch-search-show-thread "notmuch" nil)
(defcustom notmuch-show-headers '("Subject" "To" "Cc" "Date") (defcustom notmuch-message-headers '("Subject" "To" "Cc" "Date")
"Headers that should be shown in a message, in this order. "Headers that should be shown in a message, in this order.
For an open message, all of these headers will be made visible For an open message, all of these headers will be made visible
according to `notmuch-show-headers-visible' or can be toggled according to `notmuch-message-headers-visible' or can be toggled
with `notmuch-show-toggle-headers'. For a closed message, only with `notmuch-show-toggle-headers'. For a closed message, only
the first header in the list will be visible." the first header in the list will be visible."
:group 'notmuch :group 'notmuch
:type '(repeat string)) :type '(repeat string))
(defcustom notmuch-show-headers-visible t (defcustom notmuch-message-headers-visible t
"Should the headers be visible by default? "Should the headers be visible by default?
If this value is non-nil, then all of the headers defined in If this value is non-nil, then all of the headers defined in
`notmuch-show-headers' will be visible by default in the display `notmuch-message-headers' will be visible by default in the display
of each message. Otherwise, these headers will be hidden and of each message. Otherwise, these headers will be hidden and
`notmuch-show-toggle-headers' can be used to make the visible for `notmuch-show-toggle-headers' can be used to make the visible for
any given message." any given message."
@ -60,7 +60,7 @@ any given message."
(defvar notmuch-show-markup-headers-hook '(notmuch-show-colour-headers) (defvar notmuch-show-markup-headers-hook '(notmuch-show-colour-headers)
"A list of functions called to decorate the headers listed in "A list of functions called to decorate the headers listed in
`notmuch-show-headers'.") `notmuch-message-headers'.")
(defvar notmuch-show-hook '(notmuch-show-pretty-hook) (defvar notmuch-show-hook '(notmuch-show-pretty-hook)
"A list of functions called after populating a "A list of functions called after populating a
@ -214,7 +214,7 @@ message at DEPTH in the current thread."
(if (and header-value (if (and header-value
(not (string-equal "" header-value))) (not (string-equal "" header-value)))
(notmuch-show-insert-header header header-value)))) (notmuch-show-insert-header header header-value))))
notmuch-show-headers) notmuch-message-headers)
(save-excursion (save-excursion
(save-restriction (save-restriction
(narrow-to-region start (point-max)) (narrow-to-region start (point-max))
@ -433,7 +433,7 @@ current buffer, if possible."
(notmuch-show-set-message-properties msg) (notmuch-show-set-message-properties msg)
;; Set header visibility. ;; Set header visibility.
(notmuch-show-headers-visible msg notmuch-show-headers-visible) (notmuch-show-headers-visible msg notmuch-message-headers-visible)
;; Message visibility depends on whether it matched the search ;; Message visibility depends on whether it matched the search
;; criteria. ;; criteria.