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 5C4DA4196F0 for ; Fri, 14 May 2010 10:15:55 -0700 (PDT) X-Virus-Scanned: Debian amavisd-new at olra.theworths.org X-Spam-Flag: NO X-Spam-Score: -1.9 X-Spam-Level: X-Spam-Status: No, score=-1.9 tagged_above=-999 required=5 tests=[BAYES_00=-1.9] autolearn=ham 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 7nQzLrhc1f8J for ; Fri, 14 May 2010 10:15:44 -0700 (PDT) Received: from dmz-mailsec-scanner-5.mit.edu (DMZ-MAILSEC-SCANNER-5.MIT.EDU [18.7.68.34]) by olra.theworths.org (Postfix) with ESMTP id 03685418C25 for ; Fri, 14 May 2010 10:15:43 -0700 (PDT) X-AuditID: 12074422-b7c13ae000003829-2c-4bed853fa8c9 Received: from mailhub-auth-4.mit.edu (MAILHUB-AUTH-4.MIT.EDU [18.7.62.39]) by dmz-mailsec-scanner-5.mit.edu (Symantec Brightmail Gateway) with SMTP id 02.35.14377.F358DEB4; Fri, 14 May 2010 13:15:43 -0400 (EDT) Received: from outgoing.mit.edu (OUTGOING-AUTH.MIT.EDU [18.7.22.103]) by mailhub-auth-4.mit.edu (8.13.8/8.9.2) with ESMTP id o4EHFhoh020220; Fri, 14 May 2010 13:15:43 -0400 Received: from PHANATIQUE.MIT.EDU (c-71-192-160-118.hsd1.nh.comcast.net [71.192.160.118]) (authenticated bits=0) (User authenticated as nelhage@ATHENA.MIT.EDU) by outgoing.mit.edu (8.13.6/8.12.4) with ESMTP id o4EHFgCT015653 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES128-SHA bits=128 verify=NOT); Fri, 14 May 2010 13:15:43 -0400 (EDT) From: Nelson Elhage To: notmuch@notmuchmail.org Subject: [PATCH] emacs: notmuch-hello: Make widget-keymap a parent of notmuch-hello-keymap Date: Fri, 14 May 2010 13:15:38 -0400 Message-Id: <1273857338-20127-1-git-send-email-nelhage@mit.edu> X-Mailer: git-send-email 1.6.6.30.g1e6fd In-Reply-To: <1272882573-9864-1-git-send-email-Sebastian@SSpaeth.de> References: <1272882573-9864-1-git-send-email-Sebastian@SSpaeth.de> X-Brightmail-Tracker: AAAAARQpM2I= 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: Fri, 14 May 2010 17:15:55 -0000 This lets us pick up later changes to widget-keymap if the user customizes it in some way. This is the recommended way to use `widget-keymap', according to its help. --- This goes on top of Sebastian's patch. See id:1273805175-6660-1-git-send-email-nelhage@ksplice.com, where I submitted a similar, but less thorough, patch as his. emacs/notmuch-hello.el | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 1042f31..5ec2aa4 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -215,7 +215,8 @@ diagonal." (defvar notmuch-hello-mode-map - (let ((map (copy-keymap widget-keymap))) + (let ((map (make-sparse-keymap))) + (set-keymap-parent map widget-keymap) (define-key map "v" '(lambda () "Display the notmuch version" (interactive) (message "notmuch version %s" (notmuch-version)))) (define-key map "?" 'notmuch-help) -- 1.6.6.30.g1e6fd