alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

mu4e-headers: tweak mark-as-orphan option

Browse Source 
Make 'first the default, and some whitespace fixes.
This commit is contained in:
Dirk-Jan C. Binnema
2022-02-06 10:44:47 +02:00
parent 769ad20c40
commit 99993bea69
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
mu4e/mu4e-headers.el
View File

@ -207,10 +207,10 @@ chronologically (`:date') by the newest message in the thread.")
;;;; Graph drawing ;;;; Graph drawing
(defvar mu4e-headers-thread-mark-as-orphan 'all (defvar mu4e-headers-thread-mark-as-orphan 'first
"Define which messages should be prefixed with the orphan mark. "Define which messages should be prefixed with the orphan mark.
`all' marks all the messages without a parent as orphan, `first' only `all' marks all the messages without a parent as orphan, `first'
marks the first message in the thread.") only marks the first message in the thread.")
(defvar mu4e-headers-thread-root-prefix '("* " . "□ ") (defvar mu4e-headers-thread-root-prefix '("* " . "□ ")
"Prefix for root messages.") "Prefix for root messages.")
@ -457,9 +457,9 @@ with DOCID which must be present in the headers buffer."
(mu4e~headers-thread-prefix-map (mu4e~headers-thread-prefix-map
(if single-orphan 'single-orphan (if single-orphan 'single-orphan
(if (and orphan (if (and orphan
(or first-child (or first-child
(not (eq mu4e-headers-thread-mark-as-orphan 'first)))) (not (eq mu4e-headers-thread-mark-as-orphan 'first))))
'orphan 'orphan
(if last-child 'last-child (if last-child 'last-child
(if first-child 'first-child (if first-child 'first-child
'child))))))))) 'child)))))))))