refactor: use eval-when! less

These uses of this macro are a micro optimization that yield no benefit.
The only place it's useful is in autoloads (which are guaranteed to be
byte-compiled during `doom sync`).
This commit is contained in:
Henrik Lissner 2024-08-15 23:21:37 -04:00
parent 0f4328058c
commit e8a444749a
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
2 changed files with 3 additions and 3 deletions

View file

@ -70,7 +70,7 @@
;; default 0.1 should make childframes and packages that manipulate them (like
;; `lsp-ui', `company-box', and `posframe') feel much snappier. See
;; emacs-lsp/lsp-ui#613.
(eval-when! (boundp 'pgtk-wait-for-event-timeout)
(when (boundp 'pgtk-wait-for-event-timeout)
(setq pgtk-wait-for-event-timeout 0.001))
;; Increase how much is read from processes in a single chunk (default is 4kb).
@ -83,7 +83,7 @@
;; Performance on Windows is considerably worse than elsewhere. We'll need
;; everything we can get.
(eval-when! (boundp 'w32-get-true-file-attributes)
(when (boundp 'w32-get-true-file-attributes)
(setq w32-get-true-file-attributes nil ; decrease file IO workload
w32-pipe-read-delay 0 ; faster IPC
w32-pipe-buffer-size (* 64 1024))) ; read more at a time (was 4K)

View file

@ -132,5 +132,5 @@
(opam-switch-set-switch (tuareg-opam-current-compiler)))
(eval-when! (modulep! +tree-sitter)
(when (modulep! +tree-sitter)
(add-hook 'tuareg-mode-local-vars-hook #'tree-sitter!))