mirror of https://github.com/djcb/mu.git
* mu4e: make the +/- in +tag, -tag only match at the beginning of words
This commit is contained in:
parent
bb89278160
commit
dbbcaf0f2b
|
@ -205,9 +205,10 @@ store your org-contacts."
|
||||||
tagstr)
|
tagstr)
|
||||||
|
|
||||||
(dolist (tag (split-string-and-unquote retag) taglist)
|
(dolist (tag (split-string-and-unquote retag) taglist)
|
||||||
(cond ((string-match "\\+\\(.+\\)" tag)
|
(cond
|
||||||
(setq taglist (push (match-string 1 tag) taglist)))
|
((string-match "\\<\\+\\(.+\\)" tag)
|
||||||
((string-match "\\-\\(.+\\)" tag)
|
(setq taglist (push (match-string 1 tag) taglist)))
|
||||||
|
((string-match "\\<\\-\\(.+\\)" tag)
|
||||||
(setq taglist (delete (match-string 1 tag) taglist)))
|
(setq taglist (delete (match-string 1 tag) taglist)))
|
||||||
(t
|
(t
|
||||||
(setq taglist (push tag taglist)))))
|
(setq taglist (push tag taglist)))))
|
||||||
|
|
Loading…
Reference in New Issue