Commit a7f07c36 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

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

parent 73a0b3b5
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):
......
......@@ -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.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment