diff --git a/core/core-dotspacemacs.el b/core/core-dotspacemacs.el index bc1a51054..87fa52b94 100644 --- a/core/core-dotspacemacs.el +++ b/core/core-dotspacemacs.el @@ -221,6 +221,9 @@ can be toggled through `toggle-transparency'.") transparency level of a frame when it's inactive or deselected. Transparency can be toggled through `toggle-transparency'.") +(defvar dotspacemacs-show-transient-state-color-guide t + "If non nil show the color guide hint for transient state keys.") + (defvar dotspacemacs-mode-line-unicode-symbols t "If non nil unicode symbols are displayed in the mode-line (eg. for lighters)") diff --git a/core/core-transient-state.el b/core/core-transient-state.el index 154212417..d032c1665 100644 --- a/core/core-transient-state.el +++ b/core/core-transient-state.el @@ -116,7 +116,9 @@ used." (list 'concat (propertize ,(concat title "\n") 'face 'spacemacs-transient-state-title-face) - ,hint-var "\n\n" guide)))) + "\n" ,hint-var + (when dotspacemacs-show-transient-state-color-guide + (concat "\n" guide)))))) ,@bindkeys))))) (provide 'core-transient-state) diff --git a/core/templates/.spacemacs.template b/core/templates/.spacemacs.template index 3387376f2..9a3a517bd 100644 --- a/core/templates/.spacemacs.template +++ b/core/templates/.spacemacs.template @@ -201,6 +201,8 @@ values." ;; the transparency level of a frame when it's inactive or deselected. ;; Transparency can be toggled through `toggle-transparency'. (default 90) dotspacemacs-inactive-transparency 90 + ;; If non nil show the color guide hint for transient state keys + dotspacemacs-show-transient-state-color-guide t ;; If non nil unicode symbols are displayed in the mode line. (default t) dotspacemacs-mode-line-unicode-symbols t ;; If non nil smooth scrolling (native-scrolling) is enabled. Smooth