--- a/Filename.st	Tue Nov 20 19:37:29 2001 +0100
+++ b/Filename.st	Tue Nov 20 23:16:59 2001 +0100
@@ -2791,6 +2791,12 @@
 
 !Filename methodsFor:'private accessing'!
 
+getName
+    "get the raw filename"
+
+    ^ nameString 
+!
+
 setName:aString
     "set the filename"
 
@@ -4104,6 +4110,6 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.203 2001-11-19 18:14:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.204 2001-11-20 22:16:59 cg Exp $'
 ! !
 Filename initialize!