*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 30 Aug 2003 22:05:14 +0200
changeset 7596 33ba33b38a6d
parent 7595 89c4c7dba914
child 7597 db72d9d640bc
*** empty log message ***
Filename.st
--- a/Filename.st	Sat Aug 30 14:37:09 2003 +0200
+++ b/Filename.st	Sat Aug 30 22:05:14 2003 +0200
@@ -1324,6 +1324,12 @@
     "Created: / 30.10.2001 / 17:31:10 / cg"
 !
 
+definitelyExists
+    "for now - a kludge"
+
+    ^ self exists
+!
+
 extension
     "return the receiver's extension;
      that is the characters from and including
@@ -1348,6 +1354,7 @@
     "
 ! !
 
+
 !Filename methodsFor:'comparing'!
 
 = aFilename
@@ -4926,7 +4933,7 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.263 2003-07-18 12:54:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.264 2003-08-30 20:05:14 cg Exp $'
 ! !
 
 Filename initialize!