Use pushnew! to set god-exempt-major-modes
This commit is contained in:
parent
3e11008a7f
commit
1560dadb08
2 changed files with 21 additions and 30 deletions
|
@ -12,35 +12,6 @@
|
||||||
(defvar +god-fill-overflow-color "IndianRed"
|
(defvar +god-fill-overflow-color "IndianRed"
|
||||||
"Cursor and bar color when fill column width has been exceeded.")
|
"Cursor and bar color when fill column width has been exceeded.")
|
||||||
|
|
||||||
;;;###autoload
|
|
||||||
(defvar +god-default-exempt-major-modes
|
|
||||||
'(Custom-mode
|
|
||||||
Info-mode
|
|
||||||
ag-mode
|
|
||||||
calculator-mode
|
|
||||||
calendar-mode
|
|
||||||
cider-test-report-mode
|
|
||||||
compilation-mode
|
|
||||||
debugger-mode
|
|
||||||
dired-mode
|
|
||||||
edebug-mode
|
|
||||||
ediff-mode
|
|
||||||
eww-mode
|
|
||||||
geben-breakpoint-list-mode
|
|
||||||
git-commit-mode
|
|
||||||
grep-mode
|
|
||||||
ibuffer-mode
|
|
||||||
magit-popup-mode
|
|
||||||
org-agenda-mode
|
|
||||||
pdf-outline-buffer-mode
|
|
||||||
recentf-dialog-mode
|
|
||||||
sldb-mode
|
|
||||||
sly-db-mode
|
|
||||||
vc-annotate-mode
|
|
||||||
wdired-mode)
|
|
||||||
"Major modes in which `god-local-mode' will not be enabled on
|
|
||||||
initialization.")
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +god--configure-cursor-and-modeline-h ()
|
(defun +god--configure-cursor-and-modeline-h ()
|
||||||
"Configure cursor type, cursor color and doom-modeline bar color depending on mode."
|
"Configure cursor type, cursor color and doom-modeline bar color depending on mode."
|
||||||
|
|
|
@ -4,6 +4,26 @@
|
||||||
:commands god-local-mode
|
:commands god-local-mode
|
||||||
:hook (doom-after-init-modules . god-mode-all)
|
:hook (doom-after-init-modules . god-mode-all)
|
||||||
:config
|
:config
|
||||||
(setq god-exempt-major-modes +god-default-exempt-major-modes)
|
(pushnew! god-exempt-major-modes
|
||||||
|
'Custom-mode
|
||||||
|
'Info-mode
|
||||||
|
'ag-mode
|
||||||
|
'calculator-mode
|
||||||
|
'calendar-mode
|
||||||
|
'cider-test-report-mode
|
||||||
|
'compilation-mode
|
||||||
|
'debugger-mode
|
||||||
|
'edebug-mode
|
||||||
|
'ediff-mode
|
||||||
|
'eww-mode
|
||||||
|
'geben-breakpoint-list-mode
|
||||||
|
'ibuffer-mode
|
||||||
|
'org-agenda-mode
|
||||||
|
'pdf-outline-buffer-mode
|
||||||
|
'recentf-dialog-mode
|
||||||
|
'sldb-mode
|
||||||
|
'sly-db-mode
|
||||||
|
'wdired-mode)
|
||||||
|
|
||||||
(add-hook! 'post-command-hook #'+god--configure-cursor-and-modeline-h)
|
(add-hook! 'post-command-hook #'+god--configure-cursor-and-modeline-h)
|
||||||
(add-hook! 'overwrite-mode-hook #'+god--toggle-on-overwrite-h))
|
(add-hook! 'overwrite-mode-hook #'+god--toggle-on-overwrite-h))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue