Changeset 14254

Timestamp:

Sep 14, 2010, 4:25:15 AM (14 years ago)

Author:

Gary Byers

Message:

In PATHNAME-DIRECTORY-SSTR, always return (:ABSOLUTE) if there are
no directory markers (even if the substring after any host/device
markers is empty.)

File:

• trunk/source/level-1/l1-files.lisp (modified) (1 diff)

trunk/source/level-1/l1-files.lisp

@@ -852 +852 @@
        pos)
       (values (and (neq host :unspecific)
-                   (neq start end)
+                   ;;(neq start end)
                    '(:absolute))
               start))))