fix: actually open files when one is found
This commit is contained in:
parent
c90710f31b
commit
9942e063b3
@ -162,9 +162,9 @@ empty, all files are to be looked for."
|
|||||||
(when arg
|
(when arg
|
||||||
(setq dir (read-file-name "Root directory: "))
|
(setq dir (read-file-name "Root directory: "))
|
||||||
(setq ext (read-string "File extension (leave blank for all files): ")))
|
(setq ext (read-string "File extension (leave blank for all files): ")))
|
||||||
(funcall quick-find-files-completing-read
|
(find-file (funcall quick-find-files-completing-read
|
||||||
"Open file: "
|
"Open file: "
|
||||||
(quick-find-files-list-files dir ext))))
|
(quick-find-files-list-files dir ext)))))
|
||||||
|
|
||||||
; Provides ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
; Provides ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user