--- a/VSEFileSourceWriter.st	Wed Jan 28 19:08:20 2015 +0100
+++ b/VSEFileSourceWriter.st	Wed Jan 28 19:08:38 2015 +0100
@@ -91,19 +91,6 @@
     ^ VSESourceRewriter
 ! !
 
-!VSEFileSourceWriter methodsFor:'source writing'!
-
-rewrittenClassNameOf:aClass
-    |nm idx|
-
-    nm := aClass name.
-    ((nm includesString:'::') or:[aClass nameSpace notNil]) ifTrue:[
-        idx := nm indexOfSubCollection:'::'.
-        ^ (nm copyTo:idx-1) , VSESourceRewriter nameSpaceSeparatorReplacement , (nm copyFrom:idx+2)
-    ].
-    ^ nm    
-! !
-
 !VSEFileSourceWriter methodsFor:'utilities'!
 
 ensureNoUnicodeInClass:aClass
@@ -142,6 +129,17 @@
         ]
     ].
     ^ methodsToFileOut
+!
+
+rewrittenClassNameOf:aClass
+    |nm idx|
+
+    nm := aClass name.
+    (nm includesString:'::') ifTrue:[
+        idx := nm indexOfSubCollection:'::'.
+        ^ (nm copyTo:idx-1) , VSESourceRewriter nameSpaceSeparatorReplacement , (nm copyFrom:idx+2)
+    ].
+    ^ nm    
 ! !
 
 !VSEFileSourceWriter::VSESourceRewriter class methodsFor:'defaults'!
@@ -392,10 +390,10 @@
 !VSEFileSourceWriter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEFileSourceWriter.st,v 1.4 2015-01-28 17:01:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEFileSourceWriter.st,v 1.5 2015-01-28 18:08:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEFileSourceWriter.st,v 1.4 2015-01-28 17:01:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEFileSourceWriter.st,v 1.5 2015-01-28 18:08:38 cg Exp $'
 ! !