--- a/ClassDefinitionChange.st Mon Dec 02 22:53:04 2013 +0000
+++ b/ClassDefinitionChange.st Thu Dec 12 14:06:32 2013 +0000
@@ -88,7 +88,7 @@
"/ Must enforce current namespace because caller (such as Workspace!!!!!!) enforces
"/ the namespace wia NameSpaceQuerySignal. Therefore for classes not in Smalltalk.
"/ `self changeClass` will always return nil, sigh.
- ns := nameSpaceName notNil ifTrue:[(NameSpace name: nameSpaceName)] ifFalse:[nil].
+ ns := nameSpaceName notNil ifTrue:[(NameSpace fullName: nameSpaceName)] ifFalse:[nil].
Class nameSpaceQuerySignal answer: nil do:[
changeClass := self changeClass.
changeClass isNil ifTrue:[^#+].
@@ -109,7 +109,7 @@
"
"Modified: / 31-08-2011 / 09:26:48 / cg"
- "Modified: / 13-11-2013 / 17:09:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 12-12-2013 / 13:41:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
deltaDetail
@@ -213,9 +213,9 @@
"this instance setup message is used when reading from a VW-xml change file.
Support for this is not yet complete."
- |indexedType imports|
+ | imports |
- nameSpaceOverride := aNameSpaceName.
+ nameSpaceName := aNameSpaceName.
classType := aClassType.
otherParameters := Dictionary new addAll:otherParametersArg; yourself.
@@ -232,6 +232,7 @@
category := otherParameters at:#category: ifAbsent:nil.
"Modified: / 15-06-2010 / 14:50:35 / cg"
+ "Modified: / 12-12-2013 / 12:59:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
objectType