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 8D761431FD0 for ; Wed, 7 Sep 2011 01:36:05 -0700 (PDT) X-Virus-Scanned: Debian amavisd-new at olra.theworths.org X-Spam-Flag: NO X-Spam-Score: -0.7 X-Spam-Level: X-Spam-Status: No, score=-0.7 tagged_above=-999 required=5 tests=[RCVD_IN_DNSWL_LOW=-0.7] 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 AfAS6CMBdqA8 for ; Wed, 7 Sep 2011 01:36:05 -0700 (PDT) Received: from mail-vx0-f181.google.com (mail-vx0-f181.google.com [209.85.220.181]) (using TLSv1 with cipher RC4-SHA (128/128 bits)) (No client certificate requested) by olra.theworths.org (Postfix) with ESMTPS id EC0D5431FB6 for ; Wed, 7 Sep 2011 01:36:04 -0700 (PDT) Received: by vxh7 with SMTP id 7so600148vxh.26 for ; Wed, 07 Sep 2011 01:36:04 -0700 (PDT) Received: by 10.52.107.226 with SMTP id hf2mr543578vdb.330.1315384564274; Wed, 07 Sep 2011 01:36:04 -0700 (PDT) Received: from localhost (nikula.org [92.243.24.172]) by mx.google.com with ESMTPS id gv4sm2067278vdb.17.2011.09.07.01.36.01 (version=TLSv1/SSLv3 cipher=OTHER); Wed, 07 Sep 2011 01:36:02 -0700 (PDT) From: Jani Nikula To: notmuch@notmuchmail.org Subject: [PATCH 1/2] emacs: Fix notmuch-hello-tag-list-make-query defcustom Date: Wed, 7 Sep 2011 08:35:58 +0000 Message-Id: X-Mailer: git-send-email 1.7.1 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, 07 Sep 2011 08:36:05 -0000 It was not possible to define custom filters or filter functions because the types were const. Remove const to allow editing. Signed-off-by: Jani Nikula --- emacs/notmuch-hello.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 65fde75..ad1a13f 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -66,8 +66,8 @@ Finally this can be a function that will be called for each tag and should return a filter for that tag, or nil to hide the tag." :type '(choice (const :tag "All messages" nil) (const :tag "Unread messages" "tag:unread") - (const :tag "Custom filter" string) - (const :tag "Custom filter function" function)) + (string :tag "Custom filter") + (function :tag "Custom filter function")) :group 'notmuch) (defcustom notmuch-hello-hide-tags nil -- 1.7.1