Underline instead of box for overly long lines.
This commit is contained in:
parent
1d216d3efb
commit
5cfceb1b5a
15
init.el
15
init.el
|
@ -156,13 +156,19 @@
|
|||
(set-frame-parameter nil 'buffer-predicate 'my/buffer-predicate)
|
||||
|
||||
:hook
|
||||
(text-mode . auto-fill-mode)) ; Enable word-wrapping at fill-column.
|
||||
(text-mode . auto-fill-mode) ; Enable word-wrapping at fill-column.
|
||||
)
|
||||
|
||||
;; Save cursor position.
|
||||
(use-package saveplace
|
||||
:config
|
||||
(save-place-mode t))
|
||||
|
||||
;; Show and select buffers.
|
||||
(use-package bs
|
||||
:bind
|
||||
("C-x C-b" . bs-show))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;; Keybindings ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
(use-package bind-key
|
||||
:init
|
||||
|
@ -670,7 +676,8 @@ With argument, do this that many times."
|
|||
:weight normal
|
||||
:foreground nil
|
||||
:background nil
|
||||
:box (:line-width 1 :color "dark red")
|
||||
;; :box (:line-width 1 :color "dark red")
|
||||
:underline (:color "dark red")
|
||||
)))))
|
||||
(custom-set-faces ; else
|
||||
'(whitespace-line ((t (:inherit whitespace-line
|
||||
|
@ -823,10 +830,6 @@ With argument, do this that many times."
|
|||
:hook
|
||||
(find-file . auto-insert))
|
||||
|
||||
(use-package bs
|
||||
:bind
|
||||
("C-x C-b" . bs-show))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;; LaTeX ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
(if (executable-find "xetex")
|
||||
(use-package tex-site
|
||||
|
|
Loading…
Reference in New Issue
Block a user