From a2b428ce5abaa7be1857db408165621a78999d9c Mon Sep 17 00:00:00 2001 From: Tomi Ollila Date: Wed, 16 Apr 2014 09:07:19 +0300 Subject: [PATCH] Re: Emacs Keybindings no longer work after upgrading to 0.17 --- 08/8e536bef8b4b870b23b81f0d96af6c877cb765 | 122 ++++++++++++++++++++++ 1 file changed, 122 insertions(+) create mode 100644 08/8e536bef8b4b870b23b81f0d96af6c877cb765 diff --git a/08/8e536bef8b4b870b23b81f0d96af6c877cb765 b/08/8e536bef8b4b870b23b81f0d96af6c877cb765 new file mode 100644 index 000000000..cbee0a39e --- /dev/null +++ b/08/8e536bef8b4b870b23b81f0d96af6c877cb765 @@ -0,0 +1,122 @@ +Return-Path: +X-Original-To: notmuch@notmuchmail.org +Delivered-To: notmuch@notmuchmail.org +Received: from localhost (localhost [127.0.0.1]) + by olra.theworths.org (Postfix) with ESMTP id 9E628431FBF + for ; Tue, 15 Apr 2014 23:07:42 -0700 (PDT) +X-Virus-Scanned: Debian amavisd-new at olra.theworths.org +X-Spam-Flag: NO +X-Spam-Score: 0 +X-Spam-Level: +X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none] + autolearn=disabled +Received: from olra.theworths.org ([127.0.0.1]) + by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024) + with ESMTP id 8so41JbZNhhH for ; + Tue, 15 Apr 2014 23:07:29 -0700 (PDT) +Received: from guru.guru-group.fi (guru.guru-group.fi [46.183.73.34]) + by olra.theworths.org (Postfix) with ESMTP id CF7DC431FBD + for ; Tue, 15 Apr 2014 23:07:27 -0700 (PDT) +Received: from guru.guru-group.fi (localhost [IPv6:::1]) + by guru.guru-group.fi (Postfix) with ESMTP id 25CC010008F; + Wed, 16 Apr 2014 09:07:20 +0300 (EEST) +From: Tomi Ollila +To: Neeum Zawaz , notmuch@notmuchmail.org +Subject: Re: Emacs Keybindings no longer work after upgrading to 0.17 +In-Reply-To: <87eh0x26f0.fsf@fester.com> +References: <87eh0x26f0.fsf@fester.com> +User-Agent: Notmuch/0.17+201~g56da2d6 (http://notmuchmail.org) Emacs/24.3.1 + (x86_64-unknown-linux-gnu) +X-Face: HhBM'cA~ +MIME-Version: 1.0 +Content-Type: text/plain +X-BeenThere: notmuch@notmuchmail.org +X-Mailman-Version: 2.1.13 +Precedence: list +List-Id: "Use and development of the notmuch mail system." + +List-Unsubscribe: , + +List-Archive: +List-Post: +List-Help: +List-Subscribe: , + +X-List-Received-Date: Wed, 16 Apr 2014 06:07:42 -0000 + +On Wed, Apr 16 2014, Neeum Zawaz wrote: + +> 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 + +Short answer: + +(notmuch-search-tag '("-inbox" "-lowpriority" "-@review" "-@respond")) + +i.e. notmuch-search-tag takes list argument in these days... :D + +yes, it is inconvenient that formats change, but... + +Tomi + + +> +> 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@www.pentaxforums.com)" "-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 +> >>>>>>mueen@nawaz.org<<<<<< +> anl +> +> +> _______________________________________________ +> notmuch mailing list +> notmuch@notmuchmail.org +> http://notmuchmail.org/mailman/listinfo/notmuch -- 2.26.2