kylekrein/emacs-config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Turned off find file with consult

Browse source
This commit is contained in:
Aleksandr Lebedev 2025-07-14 08:02:05 +02:00
parent 4d13ce9abb
commit f71c36a25d
1 changed files with 127 additions and 127 deletions
Download patch file Download diff file Expand all files Collapse all files

4
config.org
View file

@ -1831,12 +1831,12 @@ one, an error is signaled."
;; (keymap-set consult-narrow-map (concat consult-narrow-key " ?") #'consult-narrow-help)
)
(require 'consult)
(setq read-file-name-function #'consult-find-file-with-preview)
;;(setq read-file-name-function #'consult-find-file-with-preview)
;;Previewing files in find-file
(defun consult-find-file-with-preview (prompt &optional dir default mustmatch initial pred)
(interactive)
(let ((default-directory (or dir default-directory))
(let ((default-directory (expand-file-name (or dir default-directory)))
(minibuffer-completing-file-name t))
(consult--read #'read-file-name-internal :state (consult--file-preview)
:prompt prompt