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

(dired-insert-directory): Don't assume Unix-style dir names.

Browse source
This commit is contained in:
Stefan Monnier 2008-06-10 19:10:42 +00:00
parent 73a0b3b528
commit a7f07c365f
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -1,5 +1,7 @@
2008-06-10 Stefan Monnier <monnier@iro.umontreal.ca>
* dired.el (dired-insert-directory): Don't assume Unix-style dir names.
* subr.el (momentary-string-display): Use an overlay.
* progmodes/compile.el (compilation-mode):

4
lisp/dired.el
View file

@ -1044,7 +1044,9 @@ If HDR is non-nil, insert a header line with the directory name."
;; Insert text at the beginning to standardize things.
(save-excursion
(goto-char opoint)
(if (and (or hdr wildcard) (not (looking-at "^ /.*:$")))
(if (and (or hdr wildcard)
(not (and (looking-at "^ \\(.*\\):$")
(file-name-absolute-p (match-string 1)))))
;; Note that dired-build-subdir-alist will replace the name
;; by its expansion, so it does not matter whether what we insert
;; here is fully expanded, but it should be absolute.