alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

mu4e-view: catch epg error

Browse Source 
Give a bit more user-feedback when e.g. EPG fails to decrypt a message.
This commit is contained in:
Dirk-Jan C. Binnema
2022-01-09 14:08:24 +02:00
parent ec41585dab
commit 42d5cde612
1 changed files with 15 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
mu4e/mu4e-view.el
View File

@ -1,6 +1,6 @@
;;; mu4e-view.el -- part of mu4e, the mu mail user agent -*- lexical-binding: t -*- ;;; mu4e-view.el -- part of mu4e, the mu mail user agent -*- lexical-binding: t -*-
;; Copyright (C) 2021 Dirk-Jan C. Binnema ;; Copyright (C) 2021-2022 Dirk-Jan C. Binnema
;; Author: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl> ;; Author: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
;; Maintainer: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl> ;; Maintainer: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
@ -689,15 +689,20 @@ determine which browser function to use."
(gnus-display-mime-function (mu4e~view-gnus-display-mime msg)) (gnus-display-mime-function (mu4e~view-gnus-display-mime msg))
(gnus-icalendar-additional-identities (gnus-icalendar-additional-identities
(mu4e-personal-addresses 'no-regexp))) (mu4e-personal-addresses 'no-regexp)))
(mm-enable-multibyte) (condition-case err
(mu4e-view-mode) (progn
(run-hooks 'gnus-article-decode-hook) (mm-enable-multibyte)
(gnus-article-prepare-display) (mu4e-view-mode)
(mu4e~view-activate-urls) (run-hooks 'gnus-article-decode-hook)
(setq mu4e~gnus-article-mime-handles gnus-article-mime-handles (gnus-article-prepare-display)
gnus-article-decoded-p gnus-article-decode-hook) (mu4e~view-activate-urls)
(set-buffer-modified-p nil) (setq mu4e~gnus-article-mime-handles gnus-article-mime-handles
(add-hook 'kill-buffer-hook #'mu4e~view-kill-mime-handles))) gnus-article-decoded-p gnus-article-decode-hook)
(set-buffer-modified-p nil)
(add-hook 'kill-buffer-hook #'mu4e~view-kill-mime-handles))
(epg-error
(mu4e-warn "EPG error: %s; fall back to raw view"
(error-message-string err))))))
(defun mu4e~view-kill-mime-handles () (defun mu4e~view-kill-mime-handles ()
"Kill cached MIME-handles, if any." "Kill cached MIME-handles, if any."