mirrors/doomemacs
1
Fork 0
mirror of https://github.com/doomemacs/doomemacs.git synced 2025-12-06 02:30:33 -08:00
Code Issues Projects Releases Wiki Activity

fix(lib): setq-hook!: remove docstrings from defuns

Browse source 
They aren't useful and cause byte-compiler warnings.
This commit is contained in:
Henrik Lissner 2025-05-02 14:50:01 -04:00
parent 52dbde017a
commit f00dd3d466
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 1 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/doom-lib.el
View file

@ -945,12 +945,7 @@ If N and M = 1, there's no benefit to using this macro over `remove-hook'.
(declare (indent 1))
(macroexp-progn
(cl-loop for (var val hook fn) in (doom--setq-hook-fns hooks var-vals)
collect `(defun ,fn (&rest _)
,(format "%s = %s" var
(let ((print-level nil)
(print-length nil))
(prin1-to-string val)))
(setq-local ,var ,val))
collect `(defun ,fn (&rest _) (setq-local ,var ,val))
collect `(add-hook ',hook #',fn -90))))
(defmacro unsetq-hook! (hooks &rest vars)