FileSelectionTree.st
changeset 1079 d793b0b568e1
parent 856 e5241f829446
child 1122 cd042d65d811
--- a/FileSelectionTree.st	Sat Aug 15 16:04:50 1998 +0200
+++ b/FileSelectionTree.st	Mon Aug 17 10:14:30 1998 +0200
@@ -644,6 +644,9 @@
     filename isDirectory ifFalse:[
         ^ filename
     ].
+
+^ filename makeLegalFilename.
+
     separator := Filename separator.
     pathName  := filename pathName.
 
@@ -663,6 +666,8 @@
         ^ filename
     ].
     ^ aFile asFilename
+
+    "Modified: / 17.8.1998 / 10:14:06 / cg"
 !
 
 monitorCycle
@@ -746,5 +751,5 @@
 !FileSelectionTree class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.15 1998-04-14 11:31:49 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/FileSelectionTree.st,v 1.16 1998-08-17 08:14:30 cg Exp $'
 ! !