emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

core-ui: refactor echo-keystrokes hooks

Browse source
This commit is contained in:
Henrik Lissner 2017-06-12 00:54:57 +02:00
parent 38f9e4b0a6
commit e5a04e512f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
core/core-ui.el
View file

@ -52,10 +52,12 @@ confirmation."
(add-hook 'kill-emacs-query-functions #'doom-quit-p) (add-hook 'kill-emacs-query-functions #'doom-quit-p)
;; show typed keystrokes in minibuffer ;; show typed keystrokes in minibuffer
(setq echo-keystrokes 0.02) (defun doom|enable-ui-keystrokes () (setq echo-keystrokes 0.02))
(defun doom|disable-ui-keystrokes () (setq echo-keystrokes 0))
(doom|enable-ui-keystrokes)
;; ...but hide them while isearch is active ;; ...but hide them while isearch is active
(add-hook! isearch-mode (setq echo-keystrokes 0)) (add-hook 'isearch-mode-hook #'doom|disable-ui-keystrokes)
(add-hook! isearch-mode-end (setq echo-keystrokes 0.02)) (add-hook 'isearch-mode-end-hook #'doom|enable-ui-keystrokes)
;; A minor mode for toggling the mode-line ;; A minor mode for toggling the mode-line
(defvar-local doom--modeline-format nil (defvar-local doom--modeline-format nil