Changeset 7653 for branches

Timestamp:

Nov 15, 2007, 4:22:11 PM (17 years ago)

Author:

Gary Byers

Message:

%UNIX-FILE-KIND: native-translate the namestring before calling %STAT.

File:

• branches/working-0711/ccl/level-1/linux-files.lisp (modified) (1 diff)

branches/working-0711/ccl/level-1/linux-files.lisp

@@ -314 +314 @@
 
 (defun %unix-file-kind (path &optional check-for-link)
-  (%file-kind (nth-value 1 (%stat path check-for-link))))
+  (%file-kind (nth-value 1 (%stat (native-translated-namestrig path)
+                                  check-for-link))))
 
 (defun %unix-fd-kind (fd)