diff options
| author | João Távora <joaotavora@gmail.com> | 2019-11-02 02:29:56 +0000 |
|---|---|---|
| committer | João Távora <joaotavora@gmail.com> | 2019-11-02 02:35:45 +0000 |
| commit | 88f193ed05649b8c622867b8b2623b8cb08fdc96 (patch) | |
| tree | 40a75833fb7cf2539e7beb52e285c925b9a55a93 /lisp/icomplete.el | |
| parent | 3b2f11f268372d0d01a8eb735eee0098212a9705 (diff) | |
| download | emacs-88f193ed05649b8c622867b8b2623b8cb08fdc96.tar.gz | |
Improve fix for icomplete's backward-kill-word bug#38024
* lisp/icomplete.el (icomplete-exhibit): Use
while-no-input-ignore-events, not redisplay.
Co-authored-by: Stefan Monnier <j.schmoe@example.org>
Diffstat (limited to 'lisp/icomplete.el')
| -rw-r--r-- | lisp/icomplete.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/icomplete.el b/lisp/icomplete.el index 02eae55a196..89318ca4c7e 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el @@ -399,8 +399,6 @@ Should be run via minibuffer `post-command-hook'. See `icomplete-mode' and `minibuffer-setup-hook'." (when (and icomplete-mode (icomplete-simple-completing-p)) ;Shouldn't be necessary. - (redisplay) ; FIXME: why is this sometimes needed when moving - ; up dirs in a file-finding table? (save-excursion (goto-char (point-max)) ; Insert the match-status information: @@ -420,6 +418,11 @@ See `icomplete-mode' and `minibuffer-setup-hook'." ;; embarking on computing completions: (sit-for icomplete-compute-delay))) (let* ((field-string (icomplete--field-string)) + ;; Not sure why, but such requests seem to come + ;; every once in a while. It's not fully + ;; deterministic but `C-x C-f M-DEL M-DEL ...' + ;; seems to trigger it fairly often! + (while-no-input-ignore-events '(selection-request)) (text (while-no-input (icomplete-completions field-string |