--- 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!