Tweak confpkg messaging

This commit is contained in:
Timothy 2022-09-19 09:59:29 +08:00
parent 7151e2d4d0
commit 2a12044b2d
Signed by: tec
SSH key fingerprint: SHA256:eobz41Mnm0/iYWBvWThftS0ElEs1ftBr6jamutnXc/A

View file

@ -815,13 +815,36 @@ tempbuffer. We can call this with the finalising step.
(append (list confpkg-timings)
(nreverse (remove confpkg-timings confpkg--list)))))
(insert "\n(confpkg-finish-record 'config)\n\n;;; config.el ends here")
(write-region nil nil "config.el" nil :silent))))
(write-region nil nil "config.el" nil :silent)
(message "Assembled config.el"))))
#+end_src
Applying lexical binding to the config file is good for a number of reasons,
among which it's (slightly) faster than dynamic binding (see [[https://nullprogram.com/blog/2016/12/22/][this blog post]] for
more info).
*** Quieter output
All the babel evaluation here ends up being quite noisy, let's see if we can
change that.
#+name: confpkg-quieter-output
#+begin_src emacs-lisp
(when noninteractive
(unless (fboundp 'doom-shut-up-a)
(defun doom-shut-up-a (fn &rest args)
(let ((standard-output #'ignore)
(inhibit-message t))
(apply fn args))))
(advice-add 'org-babel-expand-body:emacs-lisp :around #'doom-shut-up-a)
;; Quiet some other annoying messages
(advice-add 'sh-set-shell :around #'doom-shut-up-a)
(advice-add 'rng-what-schema :around #'doom-shut-up-a)
(advice-add 'python-indent-guess-indent-offset :around #'doom-shut-up-a))
#+end_src
#+call: confpkg-quieter-output()
*** Reporting load time information
#+call: confpkg("Confpkg timings")
@ -1075,7 +1098,7 @@ the function from the hook and call the =config.el= creation function.
(confpkg-annotate-list-dependencies)
(confpkg-create-config)
(confpkg-write-dependencies)
(message "Processed %s elisp files." (length confpkg--list)))
(message "Processed %s elisp files" (length confpkg--list)))
#+end_src
Within ~confpkg-tangle-finalise~ we carefully order each step so that