--- 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 $'
! !