Tools_ClassList.st
changeset 11556 ca2117cbf0b5
parent 11259 088e5db972c6
child 11561 842bae6ac117
equal deleted inserted replaced
11555:4eb557041f5d 11556:ca2117cbf0b5
   829             ^ self 
   829             ^ self 
   830         ].
   830         ].
   831         something == #methodTrap ifTrue:[
   831         something == #methodTrap ifTrue:[
   832             ^ self
   832             ^ self
   833         ].
   833         ].
       
   834         something == #coverageInfo ifTrue:[
       
   835             listValid == true ifTrue:[
       
   836                 self enqueueDelayedUpdateList
       
   837             ].
       
   838             ^ self.
       
   839         ].
   834         something == #methodCoverageInfo ifTrue:[
   840         something == #methodCoverageInfo ifTrue:[
   835             mthd := aParameter.
       
   836             listValid == true ifTrue:[
   841             listValid == true ifTrue:[
       
   842                 mthd := aParameter.
   837                 cls := mthd mclass.
   843                 cls := mthd mclass.
   838                 cls notNil ifTrue:[
   844                 cls notNil ifTrue:[
   839                     classListValue size > 0 ifTrue:[
   845                     classListValue size > 0 ifTrue:[
   840                         ((classListValue includesIdentical:cls theNonMetaclass)
   846                         ((classListValue includesIdentical:cls theNonMetaclass)
   841                         or:[(classListValue includesIdentical:cls theMetaclass)]) ifTrue:[
   847                         or:[(classListValue includesIdentical:cls theMetaclass)]) ifTrue:[
   926         ^ self.
   932         ^ self.
   927     ].
   933     ].
   928 
   934 
   929     super update:something with:aParameter from:changedObject
   935     super update:something with:aParameter from:changedObject
   930 
   936 
   931     "Modified: / 20-07-2011 / 18:48:30 / cg"
   937     "Modified: / 04-06-2012 / 20:06:51 / cg"
   932 ! !
   938 ! !
   933 
   939 
   934 !ClassList methodsFor:'drag & drop'!
   940 !ClassList methodsFor:'drag & drop'!
   935 
   941 
   936 canDropContext:aDropContext
   942 canDropContext:aDropContext
  1999 ! !
  2005 ! !
  2000 
  2006 
  2001 !ClassList class methodsFor:'documentation'!
  2007 !ClassList class methodsFor:'documentation'!
  2002 
  2008 
  2003 version_CVS
  2009 version_CVS
  2004     ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.57 2012-02-13 13:46:28 cg Exp $'
  2010     ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.58 2012-06-05 21:32:07 cg Exp $'
  2005 ! !
  2011 ! !