Tools__MethodList.st
branchjv
changeset 17134 c4cce8b7a95d
parent 17133 f9f20407fbf9
parent 16970 472000f80562
child 17136 cb908d2ba02e
equal deleted inserted replaced
17133:f9f20407fbf9 17134:c4cce8b7a95d
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2000 by eXept Software AG
     4  COPYRIGHT (c) 2000 by eXept Software AG
     3 	      All Rights Reserved
     5 	      All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
  1593             ].
  1595             ].
  1594         ]
  1596         ]
  1595     ].
  1597     ].
  1596     idx == 0 ifTrue:[
  1598     idx == 0 ifTrue:[
  1597         "/ method was not previously shown; try to avoid a full update
  1599         "/ method was not previously shown; try to avoid a full update
  1598         (self isMethodToBeShown:aMethod) ifTrue:[
  1600         "/ (self isMethodToBeShown:aMethod) ifTrue:[
  1599             self invalidateList
  1601             self invalidateList
  1600         ].
  1602         "/ ].
  1601     ] ifFalse:[
  1603     ] ifFalse:[
  1602         self browserNameList at:idx put:s.
  1604         self browserNameList at:idx put:s.
  1603     ]
  1605     ]
  1604 
  1606 
  1605     "Modified: / 17-08-2011 / 15:05:02 / cg"
  1607     "Modified: / 16-10-2016 / 23:31:22 / cg"
  1606 ! !
  1608 ! !
  1607 
  1609 
  1608 !MethodList methodsFor:'private-presentation'!
  1610 !MethodList methodsFor:'private-presentation'!
  1609 
  1611 
  1610 colorForCoverageInformationOfMethod:aMethod
  1612 colorForCoverageInformationOfMethod:aMethod