ClassChange.st
changeset 3135 3ae7768a2216
parent 3110 7fae5b85d143
child 3151 7b9ea70d52bf
--- a/ClassChange.st	Fri Mar 22 16:34:55 2013 +0100
+++ b/ClassChange.st	Tue Mar 26 00:47:05 2013 +0100
@@ -247,8 +247,12 @@
     "Created: / 07-09-2011 / 20:45:43 / cg"
 !
 
-nameSpaceOverride:aNamespace
-    nameSpaceOverride := aNamespace
+nameSpaceOverride:aNamespaceOrString
+    aNamespaceOrString isString ifTrue:[
+        nameSpaceOverride := NameSpace name:aNamespaceOrString
+    ] ifFalse:[
+        nameSpaceOverride := aNamespaceOrString
+    ]
 
     "Created: / 20-03-2012 / 17:12:08 / cg"
 !
@@ -432,10 +436,10 @@
 !ClassChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.67 2013-03-05 11:38:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.68 2013-03-25 23:47:05 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.67 2013-03-05 11:38:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.68 2013-03-25 23:47:05 cg Exp $'
 ! !