Commit 7702ccc5 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(insert-directory): Add workaround for the case that we

can't trust ls's output as to byte positions of filenames.
parent fb4452cc
2003-02-17 Kenichi Handa <handa@m17n.org>
* files.el (insert-directory): Add workaround for the case that we
can't trust ls's output as to byte positions of filenames.
2003-02-15 Richard M. Stallman <rms@gnu.org>
* ffap.el: Many doc fixes.
......
......@@ -4110,7 +4110,12 @@ If WILDCARD, it also runs the shell specified by `shell-file-name'."
(while (< (point) end)
(let ((start (+ beg (read (current-buffer))))
(end (+ beg (read (current-buffer)))))
(put-text-property start end 'dired-filename t)))
(if (= (char-after end) ?\n)
(put-text-property start end 'dired-filename t)
;; It seems that we can't trust ls's output as to
;; byte positions of filenames.
(put-text-property beg (point) 'dired-filename nil)
(end-of-line))))
(goto-char end)
(beginning-of-line)
(delete-region (point) (progn (forward-line 2) (point)))))
......
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