--- a/Filename.st	Thu Jun 05 15:12:50 2003 +0200
+++ b/Filename.st	Fri Jun 06 15:11:56 2003 +0200
@@ -1579,6 +1579,11 @@
      an absolute pathname."
 
     ^ self class named:self pathName
+
+    "
+     '.' asFilename
+     '.' asFilename asAbsoluteFilename
+    "
 !
 
 asCanonicalizedFilename
@@ -4916,7 +4921,7 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.257 2003-06-03 17:00:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.258 2003-06-06 13:11:56 cg Exp $'
 ! !
 
 Filename initialize!