--- a/FileBrowser.st	Thu Oct 16 17:05:28 1997 +0200
+++ b/FileBrowser.st	Tue Oct 21 20:39:32 1997 +0200
@@ -3787,7 +3787,7 @@
 				fileNameString := fileNameString , ' ...'
 			    ] ifFalse:[
 				fileNameString := aFileName.
-				thisIsVMS ifTrue:[
+				thisIsVMS == true ifTrue:[
 				    (aFileName endsWith:'.') ifTrue:[
 					aFileName ~= '..' ifTrue:[
 					    fileNameString := aFileName copyWithoutLast:1
@@ -3995,5 +3995,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.205 1997-10-08 16:09:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.206 1997-10-21 18:38:59 cg Exp $'
 ! !