/[emacs]/emacs/lisp/files.el
ViewVC logotype

Diff of /emacs/lisp/files.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.710 by rms, Mon Sep 20 16:12:57 2004 UTC revision 1.711 by monnier, Sat Sep 25 15:29:35 2004 UTC
# Line 4376  normally equivalent short `-D' option is Line 4376  normally equivalent short `-D' option is
4376                    (while (< (point) end)                    (while (< (point) end)
4377                      (let ((start (+ beg (read (current-buffer))))                      (let ((start (+ beg (read (current-buffer))))
4378                            (end (+ beg (read (current-buffer)))))                            (end (+ beg (read (current-buffer)))))
4379                        (if (= (char-after end) ?\n)                        (if (memq (char-after end) '(?\n ?\ ))
4380                              ;; End is followed by \n or by " -> ".
4381                            (put-text-property start end 'dired-filename t)                            (put-text-property start end 'dired-filename t)
4382                          ;; It seems that we can't trust ls's output as to                          ;; It seems that we can't trust ls's output as to
4383                          ;; byte positions of filenames.                          ;; byte positions of filenames.

Legend:
Removed from v.1.710  
changed lines
  Added in v.1.711

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26