procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Allow specifying a wildcard argument to list-directory again

Browse source 
* lisp/files.el (list-directory): Allow specifying a wildcard
argument interactively again (bug#55877).
This commit is contained in:
Lars Ingebrigtsen 2022-06-10 10:19:15 +02:00
parent 49e06183f5
commit 7ee736a884
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/files.el
View file

@ -7386,12 +7386,11 @@ and `list-directory-verbose-switches'."
(list (read-file-name
(if pfx "List directory (verbose): "
"List directory (brief): ")
nil default-directory t
nil
nil default-directory
(lambda (file)
(or (file-directory-p file)
(insert-directory-wildcard-in-dir-p
(expand-file-name file)))))
(file-name-as-directory (expand-file-name file))))))
pfx)))
(let ((switches (if verbose list-directory-verbose-switches
list-directory-brief-switches))