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 "- at review")
(notmuch-search-tag "- at 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:20140414235421.43aad8ffb333 at www.pentaxforums.com)"
"-inbox")
notmuch-search-tag("-inbox")
(lambda nil "Archive message." (interactive) (notmuch-search-tag "-inbox")
(notmuch-search-tag "-lowpriority") (notmuch-search-tag "- at review")
(notmuch-search-tag "- at respond"))()
call-interactively((lambda nil "Delete message." (interactive)
(notmuch-search-tag "-inbox") (notmuch-search-tag "-lowpriority")
(notmuch-search-tag "- at review") (notmuch-search-tag "- at 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 "- at review")
(notmuch-show-tag-message "- at respond")
))
--
Dictionaries are for loosers.
/\ /\ /\ /
/ \/ \ u e e n / \/ a w a z
>>>>>>mueen at nawaz.org<<<<<<
anl
