summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/subr-x.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-09-30 03:47:47 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2020-09-30 03:47:47 +0200
commite608477da2ff300bbc7796bd3c1a42394d1f1148 (patch)
tree8b8b13e59095c98008abd42f380b27a7a783a39e /lisp/emacs-lisp/subr-x.el
parent818270286222bd90b9b0c27e703252c655adfb21 (diff)
downloademacs-e608477da2ff300bbc7796bd3c1a42394d1f1148.tar.gz
emacs-e608477da2ff300bbc7796bd3c1a42394d1f1148.tar.bz2
emacs-e608477da2ff300bbc7796bd3c1a42394d1f1148.zip
Give better error feedback on wrong password in .gpg files
* lisp/epa-file.el (epa-file--find-file-not-found-function): Do a user-error when there's a wrong password (bug#43704). (epa--wrong-password-p): New function. (epa-file-insert-file-contents): Use it, and stash the error away for later signalling. * lisp/emacs-lisp/subr-x.el (if-let): Autoload.
Diffstat (limited to 'lisp/emacs-lisp/subr-x.el')
-rw-r--r--lisp/emacs-lisp/subr-x.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 9f96ac50d1c..e6abb39ddc6 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -156,6 +156,7 @@ are non-nil, then the result is non-nil."
,@(or body `(,res))))
`(let* () ,@(or body '(t))))))
+;;;###autoload
(defmacro if-let (spec then &rest else)
"Bind variables according to SPEC and evaluate THEN or ELSE.
Evaluate each binding in turn, as in `let*', stopping if a