[elpa] externals/ergoemacs-mode 427d0e4 16/87: Only echo on prefix keys

[Stefan Monnier]

branch: externals/ergoemacs-mode
commit 427d0e47afe66d0c870c026ba5b8a93bb0b76415
Author: Fidler <matthew.fidler@gmail.com>
Commit: Fidler <matthew.fidler@gmail.com>

    Only echo on prefix keys
---
 ergoemacs-command-loop.el | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/ergoemacs-command-loop.el b/ergoemacs-command-loop.el
index f9c66a2..d64b9ba 100644
--- a/ergoemacs-command-loop.el
+++ b/ergoemacs-command-loop.el
@@ -790,12 +790,13 @@ KEYS is the keys information"
   (let ((keys (this-single-command-keys)))
     (unless (or (equal [] keys)
                (ergoemacs-command-loop-p))
-      (ergoemacs-command-loop--message
-       "%s" (ergoemacs-command-loop--key-msg
-            (setq ergoemacs-command--blink-on (not 
ergoemacs-command--blink-on))
-            nil nil
-            (this-single-command-keys)
-            nil nil nil)))))
+      (when (ergoemacs-keymapp (key-binding keys))
+       (ergoemacs-command-loop--message
+        "%s" (ergoemacs-command-loop--key-msg
+              (setq ergoemacs-command--blink-on (not 
ergoemacs-command--blink-on))
+              nil nil
+              (this-single-command-keys)
+              nil nil nil))))))
 
 (defun ergoemacs-command--echo-timer ()
   "Echo the keystrokes in the `ergoemacs-mode' way."