Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
bc9c99bc
Commit
bc9c99bc
authored
Jan 11, 1995
by
Richard M. Stallman
Browse files
(dired-insert-directory): Don't call expand-file-name
when dir-or-list is a list.
parent
155ffe9c
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
7 deletions
+7
-7
lisp/dired.el
lisp/dired.el
+7
-7
No files found.
lisp/dired.el
View file @
bc9c99bc
...
...
@@ -538,16 +538,16 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh."
;; Do the right thing whether dir-or-list is atomic or not. If it is,
;; inset all files listed in the cdr (the car is the passed-in directory
;; list).
;; We expand the file names here because the may have been abbreviated
;; in dired-noselect.
(
let
((
opoint
(
point
))
end
)
(
if
(
consp
dir-or-list
)
(
progn
(
mapcar
(
function
(
lambda
(
x
)
(
insert-directory
(
expand-file-name
x
)
switches
wildcard
full-p
)))
(
cdr
dir-or-list
)))
;; In this case, use the file names in the cdr
;; exactly as originally given to dired-noselect.
(
mapcar
(
function
(
lambda
(
x
)
(
insert-directory
x
switches
wildcard
full-p
)))
(
cdr
dir-or-list
))
;; Expand the file name here because it may have been abbreviated
;; in dired-noselect.
(
insert-directory
(
expand-file-name
dir-or-list
)
switches
wildcard
full-p
))
;; Quote certain characters, unless ls quoted them for us.
(
cond
((
not
(
string-match
"b"
dired-actual-switches
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment