HierarchicalFileList.st
changeset 2536 c38f8c10dda3
parent 2525 665656ed718a
child 2583 02797ea5589d
--- a/HierarchicalFileList.st	Fri Jul 04 10:05:19 2003 +0200
+++ b/HierarchicalFileList.st	Wed Jul 09 18:36:46 2003 +0200
@@ -851,8 +851,8 @@
 label
     "returns the printable name, the baseName
     "
-    contentsItem fileName isRootDirectory ifTrue:[
-        OperatingSystem isMSWINDOWSlike ifTrue:[
+    OperatingSystem isMSWINDOWSlike ifTrue:[
+        contentsItem fileName isRootDirectory ifTrue:[
             ^ contentsItem fileName pathName
         ]
     ].
@@ -1237,7 +1237,7 @@
 !HierarchicalFileList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.48 2003-06-13 10:57:54 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.49 2003-07-09 16:36:46 penk Exp $'
 ! !
 
 HierarchicalFileList::Directory initialize!