blob: 8c41f858d667fb6ce24cd8b184231fdb095c8706 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
;;; init-indent-guides.el --- .Emacs Configuration -*- lexical-binding: t -*-
;;; Commentary:
;;
;;; Code:
;; This minor mode highlights indentation levels via font-lock
(use-package highlight-indent-guides
:ensure t
:config
(setq highlight-indent-guides-method 'character)
(setq highlight-indent-guides-responsive 'top)
(setq highlight-indent-guides-delay 0.3)
(setq highlight-indent-guides-character ?\|)
(setq highlight-indent-guides-auto-odd-face-perc 15)
(setq highlight-indent-guides-auto-even-face-perc 20)
(setq highlight-indent-guides-auto-character-face-perc 30)
(set-face-attribute 'highlight-indent-guides-character-face nil
:background "rgba(136, 136, 136, 0.1)"))
(defun general-toggle-highlight-indent-guides ()
(interactive)
(if (bound-and-true-p highlight-indent-guides-mode)
(highlight-indent-guides-mode -1)
(highlight-indent-guides-mode 1)))
(global-set-key (kbd "<f7>") 'general-toggle-highlight-indent-guides)
(provide 'init-indent-guides)
;; End:
;;; init-indent-guides.el ends here
|