Revise comments

This commit is contained in:
Henrik Lissner 2021-04-25 18:35:49 -04:00
parent c9b41205b2
commit 9d643b14ed
3 changed files with 19 additions and 20 deletions

View file

@ -282,34 +282,34 @@ config.el instead."
;; fonts that are larger than the system default (which would resize the frame). ;; fonts that are larger than the system default (which would resize the frame).
(setq frame-inhibit-implied-resize t) (setq frame-inhibit-implied-resize t)
;; Adopt a sneaky garbage collection strategy of waiting until idle time to ;; The GC introduces annoying pauses and stuttering into our Emacs experience,
;; collect; staving off the collector while the user is working. ;; so we use `gcmh' to stave off the GC while we're using Emacs, and provoke it
(setq gcmh-idle-delay 5 ;; when it's idle.
(setq gcmh-idle-delay 5 ; default is 15s
gcmh-verbose doom-debug-p) gcmh-verbose doom-debug-p)
;; Emacs "updates" its ui more often than it needs to, so we slow it down ;; Emacs "updates" its ui more often than it needs to, so slow it down slightly
;; slightly from 0.5s: (setq idle-update-delay 1.0) ; default is 0.5
(setq idle-update-delay 1.0)
;; Font compacting can be terribly expensive, especially for rendering icon ;; Font compacting can be terribly expensive, especially for rendering icon
;; fonts on Windows. Whether disabling it has a notable affect on Linux and Mac ;; fonts on Windows. Whether disabling it has a notable affect on Linux and Mac
;; hasn't been determined, but we inhibit it there anyway. This increases memory ;; hasn't been determined, but do it there anyway, just in case. This increases
;; usage, however! ;; memory usage, however!
(setq inhibit-compacting-font-caches t) (setq inhibit-compacting-font-caches t)
;; Increase how much is read from processes in a single chunk (default is 4kb). ;; Increase how much is read from processes in a single chunk (default is 4kb).
;; This is further increased by our more expensive LSP module, and where needed. ;; This is further increased elsewhere, where needed (like our LSP module).
(setq read-process-output-max (* 64 1024)) ; 64kb (setq read-process-output-max (* 64 1024)) ; 64kb
;; Introduced in Emacs HEAD (b2f8c9f), this inhibits fontification while ;; Introduced in Emacs HEAD (b2f8c9f), this inhibits fontification while
;; receiving input, which should help with performance while scrolling. ;; receiving input, which should help a little with scrolling performance.
(setq redisplay-skip-fontification-on-input t) (setq redisplay-skip-fontification-on-input t)
;; Performance on Windows is considerably worse than elsewhere. We'll need ;; Performance on Windows is considerably worse than elsewhere. We'll need
;; everything we can get. ;; everything we can get.
(when IS-WINDOWS (when IS-WINDOWS
(setq w32-get-true-file-attributes nil ; decrease file IO workload (setq w32-get-true-file-attributes nil ; decrease file IO workload
w32-pipe-read-delay 0 ; faster ipc w32-pipe-read-delay 0 ; faster IPC
w32-pipe-buffer-size (* 64 1024))) ; read more at a time (was 4K) w32-pipe-buffer-size (* 64 1024))) ; read more at a time (was 4K)
;; Remove command line options that aren't relevant to our current OS; means ;; Remove command line options that aren't relevant to our current OS; means
@ -319,9 +319,8 @@ config.el instead."
;; HACK `tty-run-terminal-initialization' is *tremendously* slow for some ;; HACK `tty-run-terminal-initialization' is *tremendously* slow for some
;; reason; inexplicably doubling startup time for terminal Emacs. Keeping ;; reason; inexplicably doubling startup time for terminal Emacs. Keeping
;; it disabled will have nasty side-effects, so we simply delay it until ;; it disabled will have nasty side-effects, so we simply delay it instead,
;; later in the startup process and, for some reason, it runs much faster ;; and invoke it later, at which point it runs quickly; how mysterious!
;; when it does.
(unless (daemonp) (unless (daemonp)
(advice-add #'tty-run-terminal-initialization :override #'ignore) (advice-add #'tty-run-terminal-initialization :override #'ignore)
(add-hook! 'window-setup-hook (add-hook! 'window-setup-hook

View file

@ -1,6 +1,6 @@
;;; lang/scheme/autoload.el -*- lexical-binding: t; -*- ;;; lang/scheme/autoload.el -*- lexical-binding: t; -*-
;; HACK `geiser' has poor autoload ettiquette. It calls ;; HACK `geiser' has poor autoload etiquette. It calls
;; `geiser-activate-implementation' and `geiser-implementation-extension' ;; `geiser-activate-implementation' and `geiser-implementation-extension'
;; in their autoloads files. Sure, these functions are autoloaded, but this ;; in their autoloads files. Sure, these functions are autoloaded, but this
;; needlessly (and unavoidably) pulls in the `geiser-impl' package (et co) ;; needlessly (and unavoidably) pulls in the `geiser-impl' package (et co)
@ -9,8 +9,8 @@
;; I rectify this by inlining calls to these two functions (and the ;; I rectify this by inlining calls to these two functions (and the
;; `geiser-impl--add-to-alist' sub-call in ;; `geiser-impl--add-to-alist' sub-call in
;; `geiser-implementation-extension'), and autoloading the two variables ;; `geiser-implementation-extension'), and autoloading the two variables
;; they operate on. I do this from our autoloads file (which is read right ;; they operate on. I do this from our autoloads file (which is
;; before package autoloads are). ;; byte-compiled and read at startup before package autoloads).
;; TODO At some point, PR this behavior upstream (but not verbatim!) ;; TODO At some point, PR this behavior upstream (but not verbatim!)
;;;###autoload (defvar geiser-active-implementations ()) ;;;###autoload (defvar geiser-active-implementations ())
;;;###autoload (defvar geiser-implementations-alist ()) ;;;###autoload (defvar geiser-implementations-alist ())

View file

@ -56,9 +56,9 @@ For example, diffs and log buffers. Accepts `left', `right', `up', and `down'.")
"~/.cache/") "~/.cache/")
"git/credential/socket"))) "git/credential/socket")))
;; Prevent scrolling when manipulating magit-status hunks. Otherwise you must ;; Prevent sudden window position resets when staging/unstaging/discarding/etc
;; reorient yourself every time you stage/unstage/discard/etc a hunk. ;; hunks in `magit-status-mode' buffers. It's disorienting, especially on
;; Especially so on larger projects." ;; larger projects.
(defvar +magit--pos nil) (defvar +magit--pos nil)
(add-hook! 'magit-pre-refresh-hook (add-hook! 'magit-pre-refresh-hook
(defun +magit--set-window-state-h () (defun +magit--set-window-state-h ()