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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6671dc67fb665a493fd407543105d02ca3cf61e6..a77f2206e58f524f079083620957e420a81d50b8 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 521729b764fc4bbb3bccc20a88919a31848499ab..8944d4c20c0302b610241cf5d29cefe6196a79e1 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"