--- a/Filename.st	Thu Jan 19 11:52:55 2017 +0100
+++ b/Filename.st	Thu Jan 19 17:00:59 2017 +0100
@@ -4579,11 +4579,24 @@
 !Filename methodsFor:'private-accessing'!
 
 getName
+    <resource: #obsolete>
     "get the raw filename"
 
     ^ nameString
 !
 
+nameString
+    "raw access to nameString - req'd for xml-store/reload"
+
+    ^ nameString
+!
+
+nameString:aString
+    "raw access to nameString - req'd for xml-store/reload"
+
+    nameString := aString
+!
+
 setName:aString
     "set the filename"
 
@@ -5587,18 +5600,6 @@
     "Modified: 18.1.1996 / 21:36:27 / cg"
 !
 
-nameString
-    "raw access to nameString - req'd for xml-store/reload"
-
-    ^ nameString
-!
-
-nameString:aString
-    "raw access to nameString - req'd for xml-store/reload"
-
-    nameString := aString
-!
-
 pathName
     "return the full pathname of the file represented by the receiver,
      as a string. This will not include ..'s.