config/doom: small modernisations
This commit is contained in:
parent
d8a667f9be
commit
5255212796
3 changed files with 17 additions and 2 deletions
|
@ -1247,6 +1247,18 @@ This is 0.3 red + 0.59 green + 0.11 blue and always between 0 and 255."
|
||||||
(ispell-hunspell-add-multi-dic ispell-dictionary)
|
(ispell-hunspell-add-multi-dic ispell-dictionary)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
(defun ediff-compare-region-clipboard (begin end)
|
||||||
|
(interactive "r")
|
||||||
|
(save-excursion
|
||||||
|
(let ((selected-region (buffer-substring begin end))
|
||||||
|
(clipboard-buffer (get-buffer-create "*ediff-clipboard*"))
|
||||||
|
(region-buffer (get-buffer-create "*ediff-region*")))
|
||||||
|
(with-current-buffer clipboard-buffer
|
||||||
|
(insert (car kill-ring)))
|
||||||
|
(with-current-buffer region-buffer
|
||||||
|
(insert selected-region))
|
||||||
|
(ediff-buffers clipboard-buffer region-buffer))))
|
||||||
|
|
||||||
; uncomment this to exit loading the config prematurely
|
; uncomment this to exit loading the config prematurely
|
||||||
;(with-current-buffer " *load*"
|
;(with-current-buffer " *load*"
|
||||||
; (goto-char (point-max)))
|
; (goto-char (point-max)))
|
||||||
|
|
|
@ -21,9 +21,11 @@
|
||||||
|
|
||||||
:completion
|
:completion
|
||||||
company ; the ultimate code completion backend
|
company ; the ultimate code completion backend
|
||||||
|
;;corfu
|
||||||
;;helm ; the *other* search engine for love and life
|
;;helm ; the *other* search engine for love and life
|
||||||
;;ido ; the other *other* search engine...
|
;;ido ; the other *other* search engine...
|
||||||
ivy ; a search engine for love and life
|
;;ivy ; a search engine for love and life
|
||||||
|
vertico
|
||||||
|
|
||||||
:ui
|
:ui
|
||||||
;;deft ; notational velocity for Emacs
|
;;deft ; notational velocity for Emacs
|
||||||
|
@ -34,7 +36,7 @@
|
||||||
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
||||||
;;hydra
|
;;hydra
|
||||||
indent-guides ; highlighted indent columns
|
indent-guides ; highlighted indent columns
|
||||||
;;ligatures ; ligatures and symbols to make your code pretty again
|
ligatures ; ligatures and symbols to make your code pretty again
|
||||||
minimap ; show a map of the code on the side
|
minimap ; show a map of the code on the side
|
||||||
modeline ; snazzy, Atom-inspired modeline, plus API
|
modeline ; snazzy, Atom-inspired modeline, plus API
|
||||||
nav-flash ; blink cursor line after big motions
|
nav-flash ; blink cursor line after big motions
|
||||||
|
|
|
@ -41,4 +41,5 @@
|
||||||
(add-to-list 'recentf-list (expand-file-name "5-incubator/download/" user-data-dir))
|
(add-to-list 'recentf-list (expand-file-name "5-incubator/download/" user-data-dir))
|
||||||
(setq recentf-list (append (list-non-hidden-directories user-data-dir) recentf-list))
|
(setq recentf-list (append (list-non-hidden-directories user-data-dir) recentf-list))
|
||||||
(setq recentf-keep '(recentf-keep-default-predicate file-remote-p "/ssh:.*"))
|
(setq recentf-keep '(recentf-keep-default-predicate file-remote-p "/ssh:.*"))
|
||||||
|
(recentf-cleanup)
|
||||||
)
|
)
|
||||||
|
|
Loading…
Add table
Reference in a new issue