summaryrefslogtreecommitdiff
path: root/cape.el
diff options
context:
space:
mode:
Diffstat (limited to 'cape.el')
-rw-r--r--cape.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/cape.el b/cape.el
index 85a8bf6..03f1d6b 100644
--- a/cape.el
+++ b/cape.el
@@ -1062,7 +1062,7 @@ If DONT-FOLD is non-nil return a case sensitive table instead."
;;;###autoload
(defun cape-wrap-noninterruptible (capf)
"Call CAPF and return a non-interruptible completion table."
- (pcase (funcall capf)
+ (pcase (let (throw-on-input) (funcall capf))
(`(,beg ,end ,table . ,plist)
`(,beg ,end ,(cape--noninterruptible-table table) ,@plist))))