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

mu4e: tweak label comments

Browse Source
This commit is contained in:
Dirk-Jan C. Binnema
2025-09-02 21:11:36 +03:00
committed by Seth Ladygo
parent 124b371850
commit 152182a567
1 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
mu4e/mu4e-labels.el
View File

@ -71,14 +71,18 @@ See `mu4e-label-regex' for the definition of the valid format."
(defun mu4e-label-parse-expr (expr)
"Parse a single delta expression EXPR.
If EXPR is non-empty, raises an error if EXPR is not a valid
delta. Otherwise, returns EXPR with extra whitespace removed.
If EXPR is non-empty, raises a warning if EXPR is not a valid
delta expression. Otherwise, returns EXPR with extra whitespace
removed.
If STR is empty, return nil."
(let ((op (aref expr 0))
(label (substring expr 1)))
;; guess we could _imply_ '+', but for now let's not
;; be too magical.
(unless (or (char-equal op ?+) (char-equal op ?-))
(mu4e-warn "invalid: delta-expression must start with '+' or '-'"))
(mu4e-warn "delta-expressions must start with + or - ('%s')"
expr))
(concat (char-to-string op)
(mu4e-label-validate label))))