Skip to content

Commit 40d82be

Browse files
committed
fix(_prepare.el): Unsilent in Eask-file by default
1 parent f9f81c9 commit 40d82be

File tree

1 file changed

+9
-8
lines changed

1 file changed

+9
-8
lines changed

lisp/_prepare.el

Lines changed: 9 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1029,7 +1029,7 @@ This uses function `locate-dominating-file' to look up directory tree."
10291029
"Try load the Eask-file in START-PATH."
10301030
(when-let* ((files (eask--find-files start-path))
10311031
(file (car files)))
1032-
(eask-file-load file)))
1032+
(eask--unsilent (eask-file-load file))))
10331033

10341034
(defmacro eask--with-hooks (&rest body)
10351035
"Execute BODY with before/after hooks."
@@ -1256,13 +1256,14 @@ version number. DESCRIPTION is the package description."
12561256
((eask-pkg-el) ; if -pkg.el is presented,
12571257
(setq skipped t) nil) ; skip it
12581258
(t (package-buffer-info)))))) ; default read main package file
1259-
(eask-msg (concat
1260-
(if eask-package-desc "" "")
1261-
"Try constructing the package-descriptor (%s)... "
1262-
(cond (eask-package-desc "succeeded!")
1263-
(skipped "skipped!")
1264-
(t "failed!")))
1265-
(file-name-nondirectory file))))
1259+
(eask-with-verbosity 'debug
1260+
(eask-msg (concat
1261+
(if eask-package-desc "" "")
1262+
"Try constructing the package-descriptor (%s)... "
1263+
(cond (eask-package-desc "succeeded!")
1264+
(skipped "skipped!")
1265+
(t "failed!")))
1266+
(file-name-nondirectory file)))))
12661267

12671268
(defun eask-f-package-file (file)
12681269
"Set package FILE."

0 commit comments

Comments
 (0)