Hi,
I have this function:
(define-key notmuch-search-mode-map "a"
(lambda ()
"Archive message."
(interactive)
(notmuch-search-tag "-inbox")
(notmuch-search-tag "-lowpriority")
(notmuch-search-tag "-@review")
(notmuch-search-tag "-@respond")
))
With the upgrade, if I try pressing "a" in search view, I get:
Wrong type argument: stringp, 43
Yet if I run the commands manually, it works fine.
The full error, BTW, is:
Debugger entered--Lisp error: (wrong-type-argument stringp 45)
string-match("^[-+]\\S-+$" 45 nil)
#[(tag-change) "\305\306\307\310\n #,?\205\311\312!\207" [tag-change start
string regexp inhibit-changing-match-data "^[-+]\\S-+$" nil t string-match
error "Tag must be of the form `+this_tag' or `-that_tag'"] 4](45)
mapc(#[(tag-change) "\305\306\307\310\n #,?\205\311\312!\207"
[tag-change start string regexp inhibit-changing-match-data "^[-+]\\S-+$" nil t
string-match error "Tag must be of the form `+this_tag' or `-that_tag'"] 4]
"-inbox")
notmuch-tag("(id:[email protected])" "-inbox")
notmuch-search-tag("-inbox")
(lambda nil "Archive message." (interactive) (notmuch-search-tag "-inbox")
(notmuch-search-tag "-lowpriority") (notmuch-search-tag "-@review")
(notmuch-search-tag "-@respond"))()
call-interactively((lambda nil "Delete message." (interactive)
(notmuch-search-tag "-inbox") (notmuch-search-tag "-lowpriority")
(notmuch-search-tag "-@review") (notmuch-search-tag "-@respond")) nil nil)
Strangely enough, the following works in show view.
(define-key notmuch-show-mode-map "a"
(lambda ()
"Archive message."
(interactive)
(notmuch-show-tag-message "-inbox")
(notmuch-show-tag-message "-lowpriority")
(notmuch-show-tag-message "-@review")
(notmuch-show-tag-message "-@respond")
))
--
Dictionaries are for loosers.
/\ /\ /\ /
/ \/ \ u e e n / \/ a w a z
>>>>>>[email protected]<<<<<<
anl
_______________________________________________
notmuch mailing list
[email protected]
http://notmuchmail.org/mailman/listinfo/notmuch
