diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2023-03-22 16:58:23 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-03-22 17:48:00 -0700 |
commit | baa465208c2589063da0cb64ebd70d9b8cbcb3fa (patch) | |
tree | fa01e7da06cbec98ae730b4ddffb768294ba68f1 | |
parent | b8368dae3cc53f9990bf7e4d5bd85edf7dcc608f (diff) | |
download | dotfiles-baa465208c2589063da0cb64ebd70d9b8cbcb3fa.tar.gz |
tidy binding C-l in minibuffers
-rw-r--r-- | .emacs.d/init.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index fc630202..e8a31326 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -1235,11 +1235,6 @@ To be used only when it seems to be necessary." (use-local-map (make-composed-keymap map (current-local-map)))))) (add-hook 'icomplete-minibuffer-setup-hook #'spw/icomplete-choose-rubout) -(define-key icomplete-fido-mode-map "\C-l" - (lambda () - (interactive) - (kill-region (minibuffer-prompt-end) (point-max)))) - ;; Preserve some standard bindings for editing text in the minibuffer. (define-key icomplete-minibuffer-map [?\C-j] nil) (define-key icomplete-fido-mode-map [?\C-r] nil) @@ -1251,6 +1246,11 @@ To be used only when it seems to be necessary." (define-key icomplete-fido-mode-map [?\M-.] #'icomplete-forward-completions) (define-key icomplete-fido-mode-map [?\M-,] #'icomplete-backward-completions) +(defun spw/empty-minibuffer () + (interactive) + (kill-region (minibuffer-prompt-end) (point-max))) +(define-key minibuffer-mode-map "\C-l" #'spw/empty-minibuffer) + ;;;; Buffers and windows |