exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Collect minibuffer customizations in separate declaration

Browse Source
This commit is contained in:
Daniel Borchmann 2025-08-07 17:41:02 +02:00
parent 2868187c24
commit 100fa46df5
No known key found for this signature in database
GPG Key ID: 50EA937BF472ADD1
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
init.el
View File

@ -298,6 +298,12 @@
(use-package man (use-package man
:init (setopt Man-switches "-a")) :init (setopt Man-switches "-a"))
(use-package minibuffer
:bind (:map minibuffer-mode-map
("M-r" . consult-history)
("C-r" . consult-history))
:hook (minibuffer-setup . cursor-intangible-mode))
(use-package multisession (use-package multisession
:init (setq multisession-directory (expand-file-name "multisession/" emacs-d-userdata))) :init (setq multisession-directory (expand-file-name "multisession/" emacs-d-userdata)))
@ -3038,7 +3044,6 @@ Note that this workaround is incomplete, as explained in this comment."
;; Global Hooks (XXX: should be moved outside of this init function) ;; Global Hooks (XXX: should be moved outside of this init function)
(add-hook 'minibuffer-setup-hook 'cursor-intangible-mode)
(add-hook 'after-save-hook 'executable-make-buffer-file-executable-if-script-p) (add-hook 'after-save-hook 'executable-make-buffer-file-executable-if-script-p)
;; Top-Level Keybindings ;; Top-Level Keybindings
@ -3110,9 +3115,6 @@ Note that this workaround is incomplete, as explained in this comment."
(bind-key "M-j" #'(lambda () (interactive) (join-line -1))) (bind-key "M-j" #'(lambda () (interactive) (join-line -1)))
(bind-key "M-z" #'zap-up-to-char) (bind-key "M-z" #'zap-up-to-char)
(bind-key "M-r" #'consult-history minibuffer-mode-map)
(bind-key "C-r" #'consult-history minibuffer-mode-map)
(bind-key [remap fill-paragraph] #'endless/fill-or-unfill) (bind-key [remap fill-paragraph] #'endless/fill-or-unfill)
(bind-key [remap keyboard-quit] #'keyboard-quit-context+) (bind-key [remap keyboard-quit] #'keyboard-quit-context+)
(bind-key [remap kill-whole-line] #'crux-kill-whole-line) (bind-key [remap kill-whole-line] #'crux-kill-whole-line)