mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(insert-directory): Obey --dired even with symlinks.

Browse source
This commit is contained in:
Stefan Monnier 2004-09-25 15:29:35 +00:00
parent 1723490639
commit 52e281e87a
2 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/ChangeLog
View file

@ -1,6 +1,10 @@
2004-09-25 Stefan <monnier@iro.umontreal.ca>
* files.el (insert-directory): Obey --dired even with symlinks.
2004-09-25 Lars Hansen <larsh@math.ku.dk>
* ls-lisp.el (ls-lisp-format): Mark file names with poperty
* ls-lisp.el (ls-lisp-format): Mark file names with property
dired-filename.
2004-09-25 Kim F. Storm <storm@cua.dk>
@ -21,8 +25,8 @@
it, and show completions.
(ido-all-completions): Let bind ido-directory-too-big to nil.
(ido-exhibit): Handle ido-directory-too-big.
(ido-read-buffer): Handle fallback to read-buffer. Init
ido-directory-too-big.
(ido-read-buffer): Handle fallback to read-buffer.
Init ido-directory-too-big.
(ido-read-file-name, ido-read-directory-name, ido-completing-read):
Init ido-directory-too-big.

3
lisp/files.el
View file

@ -4376,7 +4376,8 @@ normally equivalent short `-D' option is just passed on to
(while (< (point) end)
(let ((start (+ beg (read (current-buffer))))
(end (+ beg (read (current-buffer)))))
(if (= (char-after end) ?\n)
(if (memq (char-after end) '(?\n ?\ ))
;; End is followed by \n or by " -> ".
(put-text-property start end 'dired-filename t)
;; It seems that we can't trust ls's output as to
;; byte positions of filenames.