1

Adjust line spacing

This commit is contained in:
Jessie Hildebrandt 2022-12-29 23:48:57 -05:00
parent a8d05c7d5f
commit 2fd8909a35

32
init.el
View File

@ -300,7 +300,6 @@ DOCSTRING is an optional form that is discarded upon expansion."
"Provides an extensible, customizable, self-documenting real-time display editor."
:config
;; Enable upcase/downcase region commands
(put 'upcase-region 'disabled nil)
(put 'downcase-region 'disabled nil)
@ -308,7 +307,6 @@ DOCSTRING is an optional form that is discarded upon expansion."
(advice-add 'downcase-region :around 'user/ensure-region-active)
:custom
;; Default working directory
(default-directory (if (eq system-type 'windows-nt)
(setq default-directory (getenv "USERPROFILE"))
@ -366,7 +364,6 @@ DOCSTRING is an optional form that is discarded upon expansion."
(read-extended-command-predicate #'command-completion-default-include-p)
:bind
;; General binds
("C-z" . undo)
("C-c SPC" . tmm-menubar)
@ -386,12 +383,15 @@ DOCSTRING is an optional form that is discarded upon expansion."
("C-M-p" . backward-paragraph)
:bind*
;; Window navigation
("C-c C-i" . windmove-up)
("C-c C-k" . windmove-down)
("C-c C-j" . windmove-left)
("C-c C-l" . windmove-right))
("C-c C-l" . windmove-right)
:hook
;; Minibuffer line spacing setup
(minibuffer-setup-hook . (lambda () (setq-local line-spacing 0.15))))
;; ---------------------------------- ;;
;; autorevert
@ -517,24 +517,16 @@ DOCSTRING is an optional form that is discarded upon expansion."
(editor-feature files
"Defines most of Emacs' file-handling functionality."
:custom
;; Config file
(custom-file user/custom-file "Store customization info in a separate file")
;; Directories
(backup-directory-alist `((".*" . ,user/backup-directory)))
(auto-save-file-name-transforms `((".*" ,user/auto-save-directory t)))
(lock-file-name-transforms `((".*" ,user/lock-file-directory t)))
;; Backup behavior
(backup-by-copying t "Use copying unconditionally when creating backups")
(version-control t "Use version numbers on backup files")
(delete-old-versions t "Clean up old backup files")
(kept-new-versions 5 "Keep 5 recent backup files")
(kept-old-versions 3 "Keep 3 old backup files")
(delete-old-versions t "Clean up old backup files")
(backup-by-copying t "Use copying unconditionally when creating backups")
(custom-file user/custom-file "Store customization info in a separate file")
(backup-directory-alist `((".*" . ,user/backup-directory)) "Set backup directory location")
(auto-save-file-name-transforms `((".*" ,user/auto-save-directory t)) "Set auto save directory location")
(lock-file-name-transforms `((".*" ,user/lock-file-directory t)) "Set lock file directory location")
:hook
(before-save-hook . delete-trailing-whitespace))
@ -921,7 +913,7 @@ DOCSTRING is an optional form that is discarded upon expansion."
;; Set `line-spacing' to a custom value in corfu buffers for some
;; added visual separation between completion candidates
(advice-add 'corfu--make-buffer :around (lambda (orig-fun &rest args)
(let ((line-spacing 0.2))
(let ((line-spacing 0.20))
(apply orig-fun args))))
:custom
(corfu-auto t "Automatically display popups wherever available")