fix(god): remove hard coding of cursor color
This commit is contained in:
parent
7ba11a62ef
commit
aa079b0e3c
1 changed files with 1 additions and 4 deletions
|
@ -1,8 +1,5 @@
|
|||
;;; editor/god/autoload.el -*- lexical-binding: t; -*-
|
||||
|
||||
(defvar +god-default-color (face-background 'cursor)
|
||||
"Default cursor and bar color.")
|
||||
|
||||
(defvar +god-read-only-mode-color "Gray"
|
||||
"Cursor and bar color when `read-only-mode' is enabled.")
|
||||
|
||||
|
@ -29,7 +26,7 @@
|
|||
(cond (buffer-read-only +god-read-only-mode-color)
|
||||
(is-fill-overflow +god-fill-overflow-color)
|
||||
(overwrite-mode +god-overwrite-mode-color)
|
||||
(t +god-default-color))))
|
||||
(t previous-cursor-color))))
|
||||
(setq cursor-type next-cursor-type)
|
||||
(unless (eq previous-cursor-color next-cursor-and-modeline-color)
|
||||
(set-cursor-color next-cursor-and-modeline-color))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue