diff -r 4eb557041f5d -r ca2117cbf0b5 Tools_ClassList.st --- a/Tools_ClassList.st Tue Jun 05 22:19:01 2012 +0200 +++ b/Tools_ClassList.st Tue Jun 05 23:32:07 2012 +0200 @@ -831,9 +831,15 @@ something == #methodTrap ifTrue:[ ^ self ]. + something == #coverageInfo ifTrue:[ + listValid == true ifTrue:[ + self enqueueDelayedUpdateList + ]. + ^ self. + ]. something == #methodCoverageInfo ifTrue:[ - mthd := aParameter. listValid == true ifTrue:[ + mthd := aParameter. cls := mthd mclass. cls notNil ifTrue:[ classListValue size > 0 ifTrue:[ @@ -928,7 +934,7 @@ super update:something with:aParameter from:changedObject - "Modified: / 20-07-2011 / 18:48:30 / cg" + "Modified: / 04-06-2012 / 20:06:51 / cg" ! ! !ClassList methodsFor:'drag & drop'! @@ -2001,5 +2007,5 @@ !ClassList class methodsFor:'documentation'! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.57 2012-02-13 13:46:28 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.58 2012-06-05 21:32:07 cg Exp $' ! !