--- a/RegressionTests__ChangeSetTests.st Tue Apr 16 09:26:15 2013 +0200
+++ b/RegressionTests__ChangeSetTests.st Tue Apr 16 16:01:15 2013 +0200
@@ -97,7 +97,8 @@
' readStream.
self assert: cs size == 1.
- self assert: cs first className = 'Mocks::MockClass'.
+ self assert: cs first className = 'MockClass'.
+ self assert: cs first fullClassName = 'Mocks::MockClass'.
self assert: cs first nameSpaceName = 'Mocks'.
self assert: (Smalltalk at: #'Mocks::MockClass') isNil.
cs apply.
@@ -164,8 +165,10 @@
' readStream.
self assert: cs size == 2.
- self assert: cs first className = 'Mocks::MockClass'.
- self assert: cs second className = 'Mocks::MockClass::PrivateClass'.
+ self assert: cs first className = 'MockClass'.
+ self assert: cs first fullClassName = 'Mocks::MockClass'.
+ self assert: cs second className = 'MockClass::PrivateClass'.
+ self assert: cs second fullClassName = 'Mocks::MockClass::PrivateClass'.
self assert: cs second nameSpaceName = 'Mocks'.
self assert: (Smalltalk at: #'Mocks::MockClass') isNil.
cs apply.