summary refs log tree commit diff stats
path: root/init.el
diff options
context:
space:
mode:
Diffstat (limited to 'init.el')
-rw-r--r--init.el12
1 files changed, 3 insertions, 9 deletions
diff --git a/init.el b/init.el index 38adf44..d6e8fc8 100644 --- a/init.el +++ b/init.el
@@ -63,12 +63,6 @@
63;; see also: `acdw' and friends. Functions here aren't big enough, or they're 63;; see also: `acdw' and friends. Functions here aren't big enough, or they're
64;; too tightly bound to stuff here, to be placed in `acdw'. 64;; too tightly bound to stuff here, to be placed in `acdw'.
65 65
66;; Regular modes: `text-mode' and `prog-mode'
67(defun acdw/fringe-setup ()
68 (setq-local indicate-empty-lines t
69 indicate-buffer-boundaries '((top . right)
70 (bottom . right))))
71
72;; Flash the mode line 66;; Flash the mode line
73(defun flash-mode-line () 67(defun flash-mode-line ()
74 "Flash the modeline as a bell." 68 "Flash the modeline as a bell."
@@ -404,7 +398,7 @@
404 398
405 (:hook show-paren-mode 399 (:hook show-paren-mode
406 electric-pair-local-mode 400 electric-pair-local-mode
407 acdw/fringe-setup) 401 acdw/setup-fringes)
408 402
409 (add-hook 'after-save-hook 403 (add-hook 'after-save-hook
410 #'executable-make-buffer-file-executable-if-script-p)) 404 #'executable-make-buffer-file-executable-if-script-p))
@@ -513,7 +507,7 @@
513 507
514(setup text 508(setup text
515 (:hook turn-on-auto-fill 509 (:hook turn-on-auto-fill
516 acdw/fringe-setup)) 510 acdw/setup-fringes))
517 511
518(setup uniquify 512(setup uniquify
519 (:option uniquify-buffer-name-style 'forward 513 (:option uniquify-buffer-name-style 'forward
@@ -848,7 +842,7 @@ if ripgrep is installed, otherwise `consult-grep'."
848 (if olivetti-mode 842 (if olivetti-mode
849 (setq-local indicate-empty-lines nil 843 (setq-local indicate-empty-lines nil
850 indicate-buffer-boundaries nil) 844 indicate-buffer-boundaries nil)
851 (acdw/fringe-setup))))) 845 (acdw/setup-fringes)))))
852 846
853(setup (:straight (orderless 847(setup (:straight (orderless
854 :host github 848 :host github