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 91003429E25 for ; Tue, 20 Dec 2011 17:28:38 -0800 (PST) X-Virus-Scanned: Debian amavisd-new at olra.theworths.org X-Spam-Flag: NO X-Spam-Score: -0.1 X-Spam-Level: X-Spam-Status: No, score=-0.1 tagged_above=-999 required=5 tests=[DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1] 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 TECd9GC2OXbe for ; Tue, 20 Dec 2011 17:28:38 -0800 (PST) Received: from ks3536.kimsufi.com (schnouki.net [87.98.217.222]) by olra.theworths.org (Postfix) with ESMTP id 0074C431FB6 for ; Tue, 20 Dec 2011 17:28:37 -0800 (PST) Received: from odin.local (nancy.schnouki.net [78.238.0.45]) by ks3536.kimsufi.com (Postfix) with ESMTPSA id 219386A0026; Wed, 21 Dec 2011 02:28:37 +0100 (CET) DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple; d=schnouki.net; s=key-schnouki; t=1324430917; bh=jf7MQAM9TfjBNtF0K2q6pPl3g1v6oYn8pmsKMroh0ME=; h=From:To:Subject:Date:Message-Id:In-Reply-To:References; b=XVg20OTDt45M1eE2+A3yjYF4z92t5l3PVS3ZTG1txPBb0D0CwaSA3jY4Vy/481WQU mZHKBsD+R8djSe70eRcA4A/qai0MhTBv651iBo4BjsfHAT1Q58yptlsRbSlwByS8m9 uGBBkMTa+HpycmchGG9T3F5YtyjfUulhnAFd0QqM= From: Thomas Jost To: notmuch@notmuchmail.org Subject: [PATCH] emacs: add notmuch-hello-refresh-hook Date: Wed, 21 Dec 2011 02:28:14 +0100 Message-Id: <1324430894-5002-1-git-send-email-schnouki@schnouki.net> X-Mailer: git-send-email 1.7.8 In-Reply-To: <1324426878-14148-1-git-send-email-schnouki@schnouki.net> References: <1324426878-14148-1-git-send-email-schnouki@schnouki.net> 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, 21 Dec 2011 01:28:38 -0000 This hook is called every time a notmuch-hello buffer is updated. --- Oops, the previous patch had a typo which prevented it to work (":group notmuch" instead of ":group 'notmuch"). Sorry about that. emacs/notmuch-hello.el | 9 ++++++++- 1 files changed, 8 insertions(+), 1 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 115f80a..a2b1c4c 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -143,6 +143,11 @@ Typically \",\" in the US and UK and \".\" or \" \" in Europe." :group 'notmuch :type 'hook) +(defcustom notmuch-hello-refresh-hook nil + "Functions called after updating a `notmuch-hello' buffer." + :type 'hook + :group 'notmuch) + (defvar notmuch-hello-url "http://notmuchmail.org" "The `notmuch' web site.") @@ -590,7 +595,9 @@ Complete list of currently available key bindings: (widget-forward 1))) (unless (widget-at) - (notmuch-hello-goto-search))))) + (notmuch-hello-goto-search)))) + + (run-hooks 'notmuch-hello-refresh-hook)) (defun notmuch-folder () "Deprecated function for invoking notmuch---calling `notmuch' is preferred now." -- 1.7.8