Adjust line spacing
This commit is contained in:
parent
a8d05c7d5f
commit
2fd8909a35
32
init.el
32
init.el
@ -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")
|
||||
|
Loading…
Reference in New Issue
Block a user