emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rename and refactor god-mode hooks

Browse source
This commit is contained in:
Akhil Wali 2019-10-05 09:02:13 +13:00
parent e5288c990b
commit d14a910cf4
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

4
modules/editor/god/autoload/god.el
View file

@ -42,7 +42,7 @@
initialization.")
;;;###autoload
(defun god--configure-cursor-and-modeline ()
(defun +god--configure-cursor-and-modeline-h ()
"Configure cursor type, cursor color and doom-modeline bar color depending on mode."
(let* ((is-fill-overflow (> (current-column) fill-column))
(previous-cursor-color (face-background 'cursor))
@ -70,7 +70,7 @@ initialization.")
(doom-modeline-refresh-bars))))
;;;###autoload
(defun god--toggle-on-overwrite ()
(defun +god--toggle-on-overwrite-h ()
(if (bound-and-true-p overwrite-mode)
(god-local-mode-pause)
(god-local-mode-resume)))

10
modules/editor/god/config.el
View file

@ -1,9 +1,9 @@
;;; editor/god/config.el -*- lexical-binding: t; -*-
(use-package! god-mode
:commands (god-local-mode god-mode-all)
:hook ((after-init . god-mode-all)
(post-command . god--configure-cursor-and-modeline)
(overwrite-mode . god--toggle-on-overwrite))
:commands god-local-mode
:hook (doom-after-init-modules . god-mode-all)
:config
(setq god-exempt-major-modes god-default-exempt-major-modes))
(setq god-exempt-major-modes god-default-exempt-major-modes)
(add-hook! 'post-command-hook #'+god--configure-cursor-and-modeline-h)
(add-hook! 'overwrite-mode-hook #'+god--toggle-on-overwrite-h))