754dd75624
The faces may go out of sync if you spawn a tty frame via the server. Updating it when you switch frames is a workaround for this.
21 lines
942 B
EmacsLisp
21 lines
942 B
EmacsLisp
;;; ui/indent-guides/config.el -*- lexical-binding: t; -*-
|
|
|
|
(def-package! highlight-indent-guides
|
|
:hook ((prog-mode text-mode conf-mode) . highlight-indent-guides-mode)
|
|
:init
|
|
(setq highlight-indent-guides-method 'character)
|
|
:config
|
|
(add-hook 'focus-in-hook #'highlight-indent-guides-auto-set-faces)
|
|
|
|
;; Don't display first level of indentation
|
|
(defun +indent-guides-for-all-but-first-column (level responsive display)
|
|
(unless (< level 1)
|
|
(highlight-indent-guides--highlighter-default level responsive display)))
|
|
(setq highlight-indent-guides-highlighter-function #'+indent-guides-for-all-but-first-column)
|
|
|
|
(defun +indent-guides|disable-maybe ()
|
|
(when highlight-indent-guides-mode
|
|
(highlight-indent-guides-mode -1)))
|
|
;; `highlight-indent-guides' breaks in these modes
|
|
(add-hook 'visual-line-mode-hook #'+indent-guides|disable-maybe)
|
|
(add-hook 'org-indent-mode-hook #'+indent-guides|disable-maybe))
|