[bootstrap] Fix depreciation warning for pcase `t case

and add first usage for reference
This commit is contained in:
Maximilian Wolff 2021-04-08 19:27:30 +00:00
parent 4836a2569b
commit 38f582d785
2 changed files with 6 additions and 7 deletions

View File

@ -44,7 +44,7 @@
"Return the face associated to the current state."
(let ((state (if (eq evil-state 'operator)
evil-previous-state
evil-state)))
evil-state)))
(spacemacs/state-color-face state)))
(defun spacemacs/add-evil-cursor (state color shape)
@ -293,7 +293,7 @@ the scroll transient state.")
(stringp y)
(stringp z))))
arg)
(t
(_
(use-package-error
(format
"%s wants a symbol, string, (symbol string), (string string), (symbol string string) or list of these: %S"

View File

@ -32,8 +32,8 @@
hl-todo
popup
popwin
(zoom-frm :location local)
))
(zoom-frm :location local)))
(defun spacemacs-visual/init-ansi-colors ()
(add-hook 'compilation-filter-hook
@ -65,6 +65,7 @@
(defun spacemacs-visual/init-fill-column-indicator ()
(use-package fill-column-indicator
:defer t
:spacediminish ((fci-mode "" " f"))
:init
(progn
(setq fci-rule-width 1)
@ -76,9 +77,7 @@
:on (turn-on-fci-mode)
:off (turn-off-fci-mode)
:documentation "Display the fill column indicator."
:evil-leader "tf"))
:config
(spacemacs|diminish fci-mode "" " f")))
:evil-leader "tf"))))
(defun spacemacs-visual/init-hl-todo ()
(use-package hl-todo