Use bound-and-true-p instead of (and (boundp ...))
This commit is contained in:
parent
394a1aaac0
commit
3e11008a7f
1 changed files with 1 additions and 2 deletions
|
@ -48,8 +48,7 @@ initialization.")
|
||||||
(previous-cursor-color (face-background 'cursor))
|
(previous-cursor-color (face-background 'cursor))
|
||||||
(previous-modeline-color (and (facep 'doom-modeline-bar)
|
(previous-modeline-color (and (facep 'doom-modeline-bar)
|
||||||
(face-background 'doom-modeline-bar)))
|
(face-background 'doom-modeline-bar)))
|
||||||
(is-god-mode (and (boundp 'god-local-mode)
|
(is-god-mode (bound-and-true-p god-local-mode))
|
||||||
god-local-mode))
|
|
||||||
(next-cursor-type
|
(next-cursor-type
|
||||||
(cond (buffer-read-only 'box)
|
(cond (buffer-read-only 'box)
|
||||||
((and overwrite-mode is-god-mode) 'hollow)
|
((and overwrite-mode is-god-mode) 'hollow)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue