More stuff
This commit is contained in:
parent
42dd96957f
commit
8e4d03f44d
24
init.el
24
init.el
|
@ -157,6 +157,11 @@
|
|||
calendar-latitude _location-latitude
|
||||
calendar-longitude _location-longitude))
|
||||
|
||||
(setup compile
|
||||
(:option compilation-always-kill t
|
||||
compilation-ask-about-save nil
|
||||
compilation-scroll-output t))
|
||||
|
||||
(setup cus-edit
|
||||
;; I don't use Custom to actually /make/ any customizations, but it's handy to
|
||||
;; (A) see what options are available and (B) persist some changes across
|
||||
|
@ -398,13 +403,13 @@
|
|||
(dolist (fn
|
||||
;; All available cape capfs listed here. Add them to the front since
|
||||
;; they're reversed with `add-to-list'.
|
||||
'(;;cape-dict
|
||||
cape-ispell
|
||||
cape-abbrev
|
||||
cape-keyword
|
||||
'(cape-file
|
||||
cape-dabbrev
|
||||
cape-file))
|
||||
(add-to-list 'completion-at-point-functions fn)))
|
||||
cape-keyword
|
||||
cape-abbrev
|
||||
cape-ispell
|
||||
;;cape-dict))
|
||||
(add-to-list 'completion-at-point-functions fn :append)))))
|
||||
|
||||
(setup (:straight (capf-autosuggest
|
||||
:host nil
|
||||
|
@ -663,6 +668,13 @@ See also `crux-reopen-as-root-mode'."
|
|||
(:load-after consult embark)
|
||||
(add-hook 'embark-collect-mode-hook #'consult-preview-at-point-mode))
|
||||
|
||||
(setup (:straight epithet)
|
||||
(dolist (hook '(Info-selection-hook
|
||||
eww-after-render-hook
|
||||
help-mode-hook
|
||||
occur-mode-hook))
|
||||
(add-hook hook #'epithet-rename-buffer)))
|
||||
|
||||
(setup (:straight eros)
|
||||
(:hook-into emacs-lisp-mode
|
||||
lisp-interaction-mode))
|
||||
|
|
|
@ -63,6 +63,7 @@ Do this only if the buffer is not visiting a file."
|
|||
frame-resize-pixelwise t
|
||||
global-auto-revert-non-file-buffers t
|
||||
global-mark-ring-max 100
|
||||
hscroll-margin 1
|
||||
hscroll-step 1
|
||||
imenu-auto-rescan t
|
||||
indent-tabs-mode nil
|
||||
|
@ -83,6 +84,7 @@ Do this only if the buffer is not visiting a file."
|
|||
'face 'minibuffer-prompt)
|
||||
mode-require-final-newline 'visit-save
|
||||
mouse-drag-copy-region t
|
||||
mouse-wheel-progressive-speed nil
|
||||
mouse-yank-at-point t
|
||||
native-comp-async-report-warnings-errors 'silent
|
||||
read-answer-short t
|
||||
|
@ -95,8 +97,11 @@ Do this only if the buffer is not visiting a file."
|
|||
regexp-search-ring-max 200
|
||||
save-interprogram-paste-before-kill t
|
||||
scroll-conservatively 101
|
||||
scroll-down-aggressively 0.01
|
||||
scroll-margin 1
|
||||
scroll-preserve-screen-position 1
|
||||
scroll-step 1
|
||||
scroll-up-aggressively 0.01
|
||||
search-ring-max 200
|
||||
search-ring-max 200
|
||||
sentence-end-double-space t
|
||||
|
@ -212,7 +217,7 @@ kill without asking."
|
|||
(and (not arg)))
|
||||
(when (yes-or-no-p "Sure you want to quit? ")
|
||||
(save-buffers-kill-emacs))
|
||||
(server-save-buffers-kill-terminal nil)))
|
||||
(delete-frame nil :force)))
|
||||
|
||||
;; ... and advice
|
||||
|
||||
|
|
Loading…
Reference in New Issue