From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from localhost (localhost [127.0.0.1]) by arlo.cworth.org (Postfix) with ESMTP id 2F0826DE00C6 for ; Fri, 7 Sep 2018 04:29:33 -0700 (PDT) X-Virus-Scanned: Debian amavisd-new at cworth.org X-Spam-Flag: NO X-Spam-Score: 0.397 X-Spam-Level: X-Spam-Status: No, score=0.397 tagged_above=-999 required=5 tests=[AWL=-0.236, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H3=-0.01, RCVD_IN_MSPIKE_WL=-0.01, SPF_NEUTRAL=0.652, UNPARSEABLE_RELAY=0.001] autolearn=disabled Received: from arlo.cworth.org ([127.0.0.1]) by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id zu_PhTVravJp for ; Fri, 7 Sep 2018 04:29:31 -0700 (PDT) Received: from mail-wm0-f65.google.com (mail-wm0-f65.google.com [74.125.82.65]) by arlo.cworth.org (Postfix) with ESMTPS id 0E0D66DE00AC for ; Fri, 7 Sep 2018 04:29:29 -0700 (PDT) Received: by mail-wm0-f65.google.com with SMTP id y139-v6so14287937wmc.2 for ; Fri, 07 Sep 2018 04:29:28 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=dme-org.20150623.gappssmtp.com; s=20150623; h=from:to:subject:date:message-id:in-reply-to:references; bh=s7KULR+GIQzHcWzUB35HXQtGvfj2SeLWSm1c/xACd+Q=; b=HcCrEe41SKxet0+ZPzJPGreBBJHu+lfBlSS5FnLYp8N7CfDIZp1dITq/epjv4Wcp83 D3zDlpI6HjI7qr7+hmzzVxYamsi7Z2NSzXec3doquGvYs46TEB5OQAhZ5LfdJzCAhjQY 4uXZqtDVtvnzo59d+o02A8xNCdUkaLj2Kw56/L+1IVkQWmCJXgLvETq/V9d808wnwdcB IUVN5QDFj4b7GYDe97li+t/6CDwnNNaI7LhmAegb5OEqd+EdJ8P+BRwVmNcV4aDBvdzL 80HK61aTEx1IUgifCUQIBEeT09eMACngxuilFVZtrQW9IahpeBdbGfYd43GnDU3GpKTi GPDA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:date:message-id:in-reply-to :references; bh=s7KULR+GIQzHcWzUB35HXQtGvfj2SeLWSm1c/xACd+Q=; b=Bujm7Kcdeiajh8BhpPaOzyJqAfcOy/ZA3zRBEswChTE8o01heA6zZ20WudeG90zSv2 /56tzIRL253tYmTxlLuwLNrAbWmheDHx/pchylH5/PWv1vTKSpiiySwi3e/1/mYjptED rzM3qsda/HBRnc8sn1wsg+znKz97g0NpqYlLGLc4l4VhnF5VHK8YaYMCx5+DLnLVwRQk IeXoBTeXO2J2au6A6PjKRcyJzoVVVHslWfvcSUfOiOSnesKaJ2HD7u4u8pkWTQ5gtTbw mg4ymEXk8kWb32ddEopSCFS/WATwa+jwS+R91Q6qiOvuMjd9bb2fPMPeYXTh2PbapFI3 L9qQ== X-Gm-Message-State: APzg51DJVFAB+upq0D5Aiy86pHpY4GzFJOGqTqAjp8Spo3avYQrRU8dO FLpm1+FM+ZMkgczxwlUHTkDAiyCmQN0= X-Google-Smtp-Source: ANB0VdabaeJPCXWfk7gIeIe3cNyzFd8CxjyvEmWFc/V5YCEY0H1kyzey8KPllZ4lvWVMtk2EZ9y5UA== X-Received: by 2002:a1c:9d02:: with SMTP id g2-v6mr4486474wme.122.1536319767319; Fri, 07 Sep 2018 04:29:27 -0700 (PDT) Received: from disaster-area.hh.sledj.net (disaster-area.hh.sledj.net. [81.149.164.25]) by smtp.gmail.com with ESMTPSA id h73-v6sm20236946wma.11.2018.09.07.04.29.25 for (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Fri, 07 Sep 2018 04:29:26 -0700 (PDT) Received: from localhost (disaster-area.hh.sledj.net [local]) by disaster-area.hh.sledj.net (OpenSMTPD) with ESMTPA id 4a488ee1 for ; Fri, 7 Sep 2018 11:29:21 +0000 (UTC) From: David Edmondson To: notmuch@notmuchmail.org Subject: [PATCH v2 4/4] emacs: Improve the reporting of key activity Date: Fri, 7 Sep 2018 12:29:20 +0100 Message-Id: <20180907112920.3130-5-dme@dme.org> X-Mailer: git-send-email 2.11.0 In-Reply-To: <20180907112920.3130-1-dme@dme.org> References: <20180907112920.3130-1-dme@dme.org> X-BeenThere: notmuch@notmuchmail.org X-Mailman-Version: 2.1.26 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, 07 Sep 2018 11:29:33 -0000 Improve the information provided about key retrieval and key validity. --- emacs/notmuch-crypto.el | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch-crypto.el b/emacs/notmuch-crypto.el index 760461e8..4629c233 100644 --- a/emacs/notmuch-crypto.el +++ b/emacs/notmuch-crypto.el @@ -147,13 +147,16 @@ by user FROM." (insert "\n")) (defun notmuch-crypto-sigstatus-good-callback (button) - (let* ((sigstatus (button-get button :notmuch-sigstatus)) + (let* ((id (notmuch-show-get-message-id)) + (sigstatus (button-get button :notmuch-sigstatus)) (fingerprint (concat "0x" (plist-get sigstatus :fingerprint))) (buffer (get-buffer-create "*notmuch-crypto-gpg-out*")) (window (display-buffer buffer))) (with-selected-window window (with-current-buffer buffer (goto-char (point-max)) + (insert (format "-- Key %s in message %s:\n" + fingerprint id)) (call-process notmuch-crypto-gpg-program nil t t "--list-keys" fingerprint)) (recenter -1)))) @@ -205,10 +208,14 @@ corresponding key when the status button is pressed." (progn (notmuch-crypto--set-button-label button (format "Retrieving key %s asynchronously..." keyid)) + (with-current-buffer buffer + (goto-char (point-max)) + (insert (format "--- Retrieving key %s:\n" keyid))) (let ((p (make-process :name "notmuch GPG key retrieval" + :connection-type 'pipe :buffer buffer + :stderr buffer :command (list notmuch-crypto-gpg-program "--recv-keys" keyid) - :connection-type 'pipe :sentinel #'notmuch-crypto--async-key-sentinel ;; Create the process stopped so that ;; we have time to store the key id, @@ -224,6 +231,7 @@ corresponding key when the status button is pressed." (with-selected-window window (with-current-buffer buffer (goto-char (point-max)) + (insert (format "--- Retrieving key %s:\n" keyid)) (call-process notmuch-crypto-gpg-program nil t t "--recv-keys" keyid) (insert "\n") (call-process notmuch-crypto-gpg-program nil t t "--list-keys" keyid)) -- 2.11.0