--- a/Tools__CodeView2.st Tue Jun 17 13:39:03 2014 +0200
+++ b/Tools__CodeView2.st Tue Jun 17 14:17:26 2014 +0200
@@ -829,11 +829,11 @@
oldValue := classHolder value.
classHolder removeDependent:self.
].
+ old := classHolder.
classHolder := aValueModel.
classHolder notNil ifTrue:[
classHolder addDependent:self.
].
- old := methodHolder.
newValue := classHolder value.
oldValue ~~ newValue ifTrue:[
self update:#value with:newValue from:classHolder.
@@ -841,7 +841,7 @@
self changed: #classHolder with: old -> classHolder
- "Modified: / 17-06-2011 / 12:56:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 17-06-2014 / 13:10:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
currentBlockNodeHolder
@@ -3955,15 +3955,15 @@
!CodeView2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.157 2014-06-17 11:39:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.158 2014-06-17 12:17:26 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.157 2014-06-17 11:39:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.158 2014-06-17 12:17:26 vrany Exp $'
!
version_SVN
- ^ '$Id: Tools__CodeView2.st,v 1.157 2014-06-17 11:39:03 cg Exp $'
+ ^ '$Id: Tools__CodeView2.st,v 1.158 2014-06-17 12:17:26 vrany Exp $'
! !