--- a/Filename.st	Thu May 17 16:36:11 2001 +0200
+++ b/Filename.st	Thu May 17 16:48:43 2001 +0200
@@ -2382,6 +2382,8 @@
      a directory delimiter and returns a new fileName instance.
      See also: #withSuffix: which is new and better."
 
+    <resource:#obsolete>
+
     self obsoleteMethodWarning:'use #construct:'.
     ^ (nameString , aString asString)
 
@@ -3791,6 +3793,6 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.193 2001-05-11 18:12:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.194 2001-05-17 14:48:43 stefan Exp $'
 ! !
 Filename initialize!