debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 12:28:09 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

More portable and easier to read regex in notmuch-search-operate-all

Browse source 
The former one worked in 23.1.50.1 but not in 23.1.1.

Signed-off-by: Jed Brown <jed@59A2.org>
Tested-by: Keith Packard <keithp@keithp.com>
This commit is contained in:
Jed Brown 2009-11-28 20:51:13 +01:00 committed by Carl Worth
parent 64c8d6227a
commit 0a41c34310
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
notmuch.el
View file

@ -1152,7 +1152,7 @@ characters as well as `_.+-'.
(let ((words action-split)) (let ((words action-split))
(when (null words) (error "No operation given")) (when (null words) (error "No operation given"))
(while words (while words
(unless (string-match-p "^[\+\-][_\+\-\\w]+$" (car words)) (unless (string-match-p "^[-+][-+_.[:word:]]+$" (car words))
(error "Action must be of the form `+thistag -that_tag'")) (error "Action must be of the form `+thistag -that_tag'"))
(setq words (cdr words)))) (setq words (cdr words))))
(apply 'notmuch-call-notmuch-process "tag" (apply 'notmuch-call-notmuch-process "tag"