Commit 8ffa10a8 authored by Dmitry Gutov's avatar Dmitry Gutov

icomplete-fido-exit: New command for the M-j binding

* lisp/icomplete.el (icomplete-fido-exit): New command.
(icomplete-fido-mode-map): Use it (bug#38992).
parent 97213d71
Pipeline #4936 failed with stage
in 58 minutes and 57 seconds
......@@ -284,6 +284,13 @@ require user confirmation."
(t
(icomplete-force-complete-and-exit)))))
(defun icomplete-fido-exit ()
"Exit minibuffer properly honoring the REQUIRE-MATCH argument."
(interactive)
(if minibuffer--require-match
(minibuffer-complete-and-exit)
(exit-minibuffer)))
(defun icomplete-fido-backward-updir ()
"Delete char before or go up directory, like `ido-mode'."
(interactive)
......@@ -299,7 +306,7 @@ require user confirmation."
(define-key map (kbd "RET") 'icomplete-fido-ret)
(define-key map (kbd "C-m") 'icomplete-fido-ret)
(define-key map (kbd "DEL") 'icomplete-fido-backward-updir)
(define-key map (kbd "M-j") 'exit-minibuffer)
(define-key map (kbd "M-j") 'icomplete-fido-exit)
(define-key map (kbd "C-s") 'icomplete-forward-completions)
(define-key map (kbd "C-r") 'icomplete-backward-completions)
(define-key map (kbd "<right>") 'icomplete-forward-completions)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment