From f122d3d42e5b5c0775826247f8d6622bc63e9d94 Mon Sep 17 00:00:00 2001 From: justbur Date: Tue, 7 Jul 2015 15:00:10 -0400 Subject: [PATCH] Make default delay less aggressive. Also avoids touching echo-keystrokes if it is already low. --- which-key.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/which-key.el b/which-key.el index b42279b2458..1a25433c67a 100644 --- a/which-key.el +++ b/which-key.el @@ -25,7 +25,7 @@ (require 'cl-extra) (require 's) -(defvar which-key-idle-delay 0.6 +(defvar which-key-idle-delay 1 "Delay (in seconds) for which-key buffer to popup.") ;; (defvar which-key-close-buffer-idle-delay 4 ;; "Delay (in seconds) after which buffer is forced closed.") @@ -97,11 +97,14 @@ Used when `which-key-popup-type' is frame.") (if which-key-mode (progn (unless which-key--setup-p (which-key/setup)) - ;; make echo-keytrokes fast for minibuffer popup + ;; reduce echo-keytrokes for minibuffer popup ;; (it can interfer if it's too slow) (when (and (> echo-keystrokes 0) (eq which-key-popup-type 'minibuffer)) - (setq echo-keystrokes 0.1)) + (setq echo-keystrokes + (min echo-keystrokes (/ (float which-key-idle-delay) 2))) + (message "Which-key-mode enabled (note 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) (add-hook 'focus-in-hook #'which-key/start-open-timer)