Add visual-fill-column

This commit is contained in:
Case Duckworth 2021-09-30 23:17:08 -05:00
parent b7b43e326a
commit bc4f54512b
1 changed files with 11 additions and 0 deletions

11
init.el
View File

@ -1741,6 +1741,17 @@ browser defined in `browse-url-secondary-browser-function'."
indicate-buffer-boundaries nil)
(acdw/setup-fringes)))))
(setup (:straight visual-fill-column)
(:option visual-fill-column-width (+ fill-column 4)
visual-fill-column-center-text t
(append reading-modes) '(visual-fill-column-mode . +1))
(:hook (defun visual-fill-column@setup ()
(if visual-fill-column-mode
(setq-local indicate-empty-lines nil
indicate-buffer-boundaries nil)
(acdw/setup-fringes))))
(:advise text-scale-adjust :after #'visual-fill-column-adjust))
(setup (:straight (orderless
:host github
:repo "oantolin/orderless"))