mirror of https://github.com/djcb/mu.git
mu4e: move some more variables from headers->search
We were incomplete.
This commit is contained in:
parent
b9841942d8
commit
9f1e626ef7
|
@ -129,23 +129,6 @@ next mail after marking a message in header view."
|
|||
:group 'mu4e-headers)
|
||||
|
||||
|
||||
(defvar mu4e-headers-hide-predicate nil
|
||||
"Predicate function to hide matching headers.
|
||||
Either nil or a function taking one message plist parameter and
|
||||
which which return non-nil for messages that should be hidden from
|
||||
the search results. Also see `mu4e-headers-hide-enabled'.
|
||||
|
||||
Example that hides all trashed messages:
|
||||
|
||||
(setq mu4e-headers-hide-predicate
|
||||
(lambda (msg)
|
||||
(member \='trashed (mu4e-message-field msg :flags)))).")
|
||||
|
||||
(defvar mu4e-headers-hide-enabled t
|
||||
"Whether `mu4e-headers-hide-predicate' should be active.
|
||||
This can be used to toggle use of the predicate through
|
||||
`mu4e-headers-toggle-property'.")
|
||||
|
||||
(defcustom mu4e-headers-visible-flags
|
||||
'(draft flagged new passed replied trashed attach encrypted signed
|
||||
list personal)
|
||||
|
@ -665,8 +648,8 @@ space propertized with a `display' text property which expands to
|
|||
(defsubst mu4e~message-header-line (msg)
|
||||
"Return a propertized description of message MSG suitable for
|
||||
displaying in the header view."
|
||||
(if (and mu4e-headers-hide-enabled mu4e-headers-hide-predicate
|
||||
(funcall mu4e-headers-hide-predicate msg))
|
||||
(if (and mu4e-search-hide-enabled mu4e-search-hide-predicate
|
||||
(funcall mu4e-search-hide-predicate msg))
|
||||
(progn
|
||||
(cl-incf mu4e~headers-hidden)
|
||||
nil)
|
||||
|
@ -1269,12 +1252,12 @@ message plist, or nil if not found."
|
|||
(if (car flag-cell)
|
||||
(if mu4e-use-fancy-chars
|
||||
(cddr flag-cell) (cadr flag-cell) ) ""))
|
||||
`((,mu4e-search-full . ,mu4e-headers-full-label)
|
||||
`((,mu4e-search-full . ,mu4e-headers-full-label)
|
||||
(,mu4e-search-include-related . ,mu4e-headers-related-label)
|
||||
(,mu4e-search-threads . ,mu4e-headers-threaded-label)
|
||||
(,mu4e-search-threads . ,mu4e-headers-threaded-label)
|
||||
(,mu4e-search-skip-duplicates
|
||||
. ,mu4e-headers-skip-duplicates-label)
|
||||
(,mu4e-headers-hide-enabled . ,mu4e-headers-hide-label))
|
||||
(,mu4e-search-hide-enabled . ,mu4e-headers-hide-label))
|
||||
""))
|
||||
(name "mu4e-headers"))
|
||||
|
||||
|
|
|
@ -178,6 +178,12 @@
|
|||
(make-obsolete-variable 'mu4e-headers-sort-direction
|
||||
'mu4e-search-sort-direction "1.9.11")
|
||||
|
||||
(make-obsolete-variable 'mu4e-headers-hide-predicate
|
||||
'mu4e-search-hide-predicate "1.9.11")
|
||||
(make-obsolete-variable 'mu4e-headers-hide-enabled
|
||||
'mu4e-search-hide-enabled "1.9.11")
|
||||
|
||||
|
||||
|
||||
;; mu4e-main
|
||||
(define-obsolete-variable-alias
|
||||
|
|
|
@ -78,6 +78,24 @@ and offlineimap."
|
|||
:type 'boolean
|
||||
:group 'mu4e-search)
|
||||
|
||||
(defvar mu4e-search-hide-predicate nil
|
||||
"Predicate function to hide matching headers.
|
||||
Either nil or a function taking one message plist parameter and
|
||||
which which return non-nil for messages that should be hidden from
|
||||
the search results. Also see `mu4e-search-hide-enabled'.
|
||||
|
||||
Example that hides all trashed messages:
|
||||
|
||||
(setq mu4e-search-hide-predicate
|
||||
(lambda (msg)
|
||||
(member \='trashed (mu4e-message-field msg :flags)))).")
|
||||
|
||||
(defvar mu4e-search-hide-enabled t
|
||||
"Whether `mu4e-search-hide-predicate' should be active.
|
||||
This can be used to toggle use of the predicate through
|
||||
`mu4e-search-toggle-property'.")
|
||||
|
||||
|
||||
(defcustom mu4e-search-sort-field :date
|
||||
"Field to sort the headers by. A symbol:
|
||||
one of: `:date', `:subject', `:size', `:prio', `:from', `:to.',
|
||||
|
@ -123,7 +141,7 @@ anything about the query, it just does text replacement."
|
|||
This function receives the query as its parameter, before any
|
||||
rewriting as per `mu4e-query-rewrite-function' has taken place.
|
||||
|
||||
The reason to use this instead of `mu4e-headers-search-hook' is
|
||||
The reason to use this instead of `mu4e-search-hook' is
|
||||
if you only want to execute a hook when a search is entered via a
|
||||
bookmark, e.g. if you'd like to treat the bookmarks as a custom
|
||||
folder and change the options for the search."
|
||||
|
@ -424,8 +442,8 @@ If KEY is provided, use it instead of asking user."
|
|||
(let* ((toggles '(("fFull-search" . mu4e-search-full)
|
||||
("rInclude-related" . mu4e-headers-include-related)
|
||||
("tShow threads" . mu4e-search-threads)
|
||||
("uSkip duplicates" . mu4e-headers-skip-duplicates)
|
||||
("pHide-predicate" . mu4e-headers-hide-enabled)))
|
||||
("uSkip duplicates" . mu4e-search-skip-duplicates)
|
||||
("pHide-predicate" . mu4e-search-hide-enabled)))
|
||||
(toggles (seq-map
|
||||
(lambda (cell)
|
||||
(cons
|
||||
|
|
Loading…
Reference in New Issue