Revise comments
This commit is contained in:
parent
c9b41205b2
commit
9d643b14ed
3 changed files with 19 additions and 20 deletions
27
core/core.el
27
core/core.el
|
@ -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
|
||||||
|
|
|
@ -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 ())
|
||||||
|
|
|
@ -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 ()
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue