--- a/ClassDefinitionChange.st Tue Jan 24 18:42:11 2012 +0100
+++ b/ClassDefinitionChange.st Tue Jan 24 23:17:07 2012 +0100
@@ -101,6 +101,7 @@
class := self changeClass.
class isNil ifTrue:[^ ChangeDeltaInformation added ].
+ class isLoaded ifFalse:[^ ChangeDeltaInformation different ].
mySource := self source.
imageSource := class definitionWithoutPackage "definition".
same := (mySource = imageSource).
@@ -138,6 +139,7 @@
ifFalse:[ ChangeDeltaInformation different ]
"Created: / 31-08-2011 / 10:26:42 / cg"
+ "Modified: / 24-01-2012 / 22:13:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
instanceVariableNames
@@ -567,11 +569,11 @@
!ClassDefinitionChange class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.65 2011-12-28 15:35:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.66 2012-01-24 22:17:07 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.65 2011-12-28 15:35:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.66 2012-01-24 22:17:07 vrany Exp $'
!
version_SVN