emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/cape 79e8771c18: cape--company-call: Bind echo-keystrok


From: ELPA Syncer
Subject: [elpa] externals/cape 79e8771c18: cape--company-call: Bind echo-keystrokes=0 around read-event
Date: Sat, 12 Mar 2022 20:57:18 -0500 (EST)

branch: externals/cape
commit 79e8771c18c76a5bef5fdbf74718527e74b6d702
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    cape--company-call: Bind echo-keystrokes=0 around read-event
    
    See #25, cc @galeo
---
 cape.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cape.el b/cape.el
index 17e3e11529..e17888b7fd 100644
--- a/cape.el
+++ b/cape.el
@@ -908,7 +908,9 @@ If INTERACTIVE is nil the function acts like a capf."
                                 (push 'cape--done unread-command-events)
                                 (setq res arg))))
                    (when (eq res 'cape--waiting)
-                     (let ((ev (let (input-method-function) (read-event nil 
t))))
+                     (let ((ev (let ((input-method-function nil)
+                                     (echo-keystrokes 0))
+                                 (read-event nil t))))
                        (unless (eq ev 'cape--done)
                          (push (cons t ev) unread-command-events)
                          (setq res 'cape--cancelled)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]