mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-02 11:50:48 -08:00
Code Issues Projects Releases Wiki Activity

Better notes

Browse source
This commit is contained in:
justbur 2015-07-15 14:11:04 -04:00
parent abbedca804
commit 909ebe4876
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
which-key.el
View file

@ -263,7 +263,7 @@ Used when `which-key-popup-type' is frame.")
(when (and (> echo-keystrokes 0)
(eq which-key-popup-type 'minibuffer))
(setq echo-keystrokes which-key-echo-keystrokes)
(message "Which-key: note echo-keystrokes changed from %s to %s"
(message "which-key: echo-keystrokes changed from %s to %s"
which-key--echo-keystrokes-backup echo-keystrokes)))
(add-hook 'pre-command-hook #'which-key--hide-popup)
(add-hook 'focus-out-hook #'which-key--stop-open-timer)
@ -322,7 +322,7 @@ bottom."
(error "KEY and REPL should be strings"))
(cond ((null alist) (list (cons key repl)))
((assoc-string key alist)
(message "Which-key: note the key %s already exists in %s. This addition will override that replacement."
(message "which-key: the key %s already exists in %s. This addition will override that replacement."
key alist)
(setcdr (assoc-string key alist) repl)
alist)