summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/package.el
diff options
context:
space:
mode:
authorYuuki Harano <masm+github@masm11.me>2021-05-19 22:02:06 +0900
committerYuuki Harano <masm+github@masm11.me>2021-05-19 22:02:06 +0900
commite48372f8e5722643e37185b004469acd174663f7 (patch)
treeb77ec71bb51856f98d34182eca56322750533017 /lisp/emacs-lisp/package.el
parentd0fa569b7303c2d893b54d0a7af7a521308a5ed4 (diff)
parent61291e06cc804de2075305c220d31ef6072f28c8 (diff)
downloademacs-e48372f8e5722643e37185b004469acd174663f7.tar.gz
emacs-e48372f8e5722643e37185b004469acd174663f7.tar.bz2
emacs-e48372f8e5722643e37185b004469acd174663f7.zip
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'lisp/emacs-lisp/package.el')
-rw-r--r--lisp/emacs-lisp/package.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index e1339177519..5df9b53657b 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1305,7 +1305,10 @@ is non-nil, don't propagate connection errors (does not apply to
errors signaled by ERROR-FORM or by BODY).
\(fn URL &key ASYNC FILE ERROR-FORM NOERROR &rest BODY)"
- (declare (indent defun) (debug t))
+ (declare (indent defun)
+ ;; FIXME: This should be something like
+ ;; `form def-body &rest form', but that doesn't work.
+ (debug (form &rest sexp)))
(while (keywordp (car body))
(setq body (cdr (cdr body))))
`(package--with-response-buffer-1 ,url (lambda () ,@body)
@@ -2267,7 +2270,7 @@ Clean-up the corresponding .eln files if Emacs is native
compiled."
(when (featurep 'native-compile)
(cl-loop
- for file in (directory-files-recursively dir ".el\\'")
+ for file in (directory-files-recursively dir "\\.el\\'")
do (comp-clean-up-stale-eln (comp-el-to-eln-filename file))))
(delete-directory dir t))