RegressionTests__ChangeSetTests.st
changeset 928 bc2301253761
parent 927 d0826769b96a
child 947 72b27d83338f
--- a/RegressionTests__ChangeSetTests.st	Thu May 09 15:42:33 2013 +0200
+++ b/RegressionTests__ChangeSetTests.st	Thu May 09 16:20:59 2013 +0200
@@ -626,11 +626,13 @@
 
     self assert: cs size == 3.
     self assert: cs third className = 'MockClass::PrivateClass'.
+    self assert: cs third fullClassName = 'MockClass::PrivateClass'.
     self assert: (Smalltalk at: #'MockClass') isNil.
     cs apply.
     self assert:((Smalltalk at: #'MockClass::PrivateClass') methodDictionary includesKey: #foo)
 
     "Created: / 01-05-2013 / 09:50:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 09-05-2013 / 15:18:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 test_MethodDefinitionChange_03b