perf(lib): setq-hook!: don't load pp at startup

2025-08-01 12:17:25 -05:00 · 2025-03-04 14:13:38 -05:00
parent 56ce6cc284
commit 8846d15181
1 changed files with 4 additions and 1 deletions
--- a/lisp/doom-lib.el
+++ b/lisp/doom-lib.el
@ -954,7 +954,10 @@ If N and M = 1, there's no benefit to using this macro over `remove-hook'.
  (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 (pp-to-string val))
+                       ,(format "%s = %s" var
+                                (let ((print-level nil)
+                                      (print-length nil))
+                                  (prin1-to-string val)))
                       (setq-local ,var ,val))
            collect `(add-hook ',hook #',fn -90))))