procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Allow disabling viper faces in the minibuffer

Browse source 
* lisp/emulation/viper-cmd.el (viper-enable-minibuffer-faces): New
defcustom.
(viper-set-mode-vars-for): Use it to decide whether to use
distinct faces in the minibuffer.  (Bug#61432)

Copyright-paperwork-exempt: yes
This commit is contained in:
andrés ramírez 2023-02-13 15:02:52 +00:00 • committed by Eli Zaretskii
parent 97f24924df
commit b3502b9228
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/emulation/viper-cmd.el
View file

@ -466,6 +466,12 @@
;; Viper mode-changing commands and utilities
(defcustom viper-enable-minibuffer-faces t
"If non-nil, viper uses distinct faces in the minibuffer."
:type 'boolean
:version "30.1"
:group 'viper-misc)
;; Modifies mode-line-buffer-identification.
(defun viper-refresh-mode-line ()
(setq-local viper-mode-string
@ -561,7 +567,7 @@
))
;; minibuffer faces
(if (viper-has-face-support-p)
(if (and (viper-has-face-support-p) viper-enable-minibuffer-faces)
(setq viper-minibuffer-current-face
(cond ((eq state 'emacs-state) viper-minibuffer-emacs-face)
((eq state 'vi-state) viper-minibuffer-vi-face)