diff options
| -rw-r--r-- | lisp/icomplete.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/lisp/icomplete.el b/lisp/icomplete.el index d0d3d65c346..a732d4cc0d1 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el | |||
| @@ -319,13 +319,14 @@ require user confirmation." | |||
| 319 | 319 | ||
| 320 | (defun icomplete--fido-mode-setup () | 320 | (defun icomplete--fido-mode-setup () |
| 321 | "Setup `fido-mode''s minibuffer." | 321 | "Setup `fido-mode''s minibuffer." |
| 322 | (use-local-map (make-composed-keymap icomplete-fido-mode-map | 322 | (when (and icomplete-mode (icomplete-simple-completing-p)) |
| 323 | (current-local-map))) | 323 | (use-local-map (make-composed-keymap icomplete-fido-mode-map |
| 324 | (setq-local icomplete-tidy-shadowed-file-names t | 324 | (current-local-map))) |
| 325 | icomplete-show-matches-on-no-input t | 325 | (setq-local icomplete-tidy-shadowed-file-names t |
| 326 | icomplete-hide-common-prefix nil | 326 | icomplete-show-matches-on-no-input t |
| 327 | completion-styles '(flex) | 327 | icomplete-hide-common-prefix nil |
| 328 | completion-category-defaults nil)) | 328 | completion-styles '(flex) |
| 329 | completion-category-defaults nil))) | ||
| 329 | 330 | ||
| 330 | ;;;###autoload | 331 | ;;;###autoload |
| 331 | (define-minor-mode fido-mode | 332 | (define-minor-mode fido-mode |