(ls-lisp-format): Mark file names with poperty dired-filename.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6671dc6..a77f220 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-09-25  Lars Hansen  <larsh@math.ku.dk>
+
+       * ls-lisp.el (ls-lisp-format): Mark file names with poperty
+       dired-filename.
+
 2004-09-25  Kim F. Storm  <storm@cua.dk>
 
        * ido.el (ido-max-directory-size): New defcustom.

diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index 521729b..8944d4c 100644 (file)
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -534,7 +534,7 @@ SWITCHES, TIME-INDEX and NOW give the full switch list and time data."
            " "
            (ls-lisp-format-time file-attr time-index now)
            " "
-           file-name
+           (propertize file-name 'dired-filename t)
            (if (stringp file-type)     ; is a symbolic link
                (concat " -> " file-type))
            "\n"