diff options
Diffstat (limited to 'lisp/emacs-lisp/package.el')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index c30f7758df4..706614e9df1 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -1219,8 +1219,7 @@ errors signaled by ERROR-FORM or by BODY). | |||
| 1219 | (when (condition-case ,err | 1219 | (when (condition-case ,err |
| 1220 | (progn ,@before-body t) | 1220 | (progn ,@before-body t) |
| 1221 | (error (funcall error-function) | 1221 | (error (funcall error-function) |
| 1222 | (unless noerror | 1222 | (unless noerror (signal ,err)))) |
| 1223 | (signal (car ,err) (cdr ,err))))) | ||
| 1224 | (funcall ,body))))) | 1223 | (funcall ,body))))) |
| 1225 | 1224 | ||
| 1226 | (cl-defun package--with-response-buffer-1 (url body &key async file error-function noerror &allow-other-keys) | 1225 | (cl-defun package--with-response-buffer-1 (url body &key async file error-function noerror &allow-other-keys) |