Tools__MethodList.st
branchjv
changeset 17133 f9f20407fbf9
parent 16770 876fd5497347
parent 16891 02a3f0fafc59
child 17134 c4cce8b7a95d
equal deleted inserted replaced
17132:17d361c666c2 17133:f9f20407fbf9
  1686     icn isNil ifTrue:[
  1686     icn isNil ifTrue:[
  1687         (aMethod notNil and:[aMethod isMethodWithBreakpoints]) ifTrue:[
  1687         (aMethod notNil and:[aMethod isMethodWithBreakpoints]) ifTrue:[
  1688             aMethod hasEnabledBreakpoints ifTrue:[ 
  1688             aMethod hasEnabledBreakpoints ifTrue:[ 
  1689                 icn := self lineBreakPointedIcon
  1689                 icn := self lineBreakPointedIcon
  1690             ] ifFalse:[    
  1690             ] ifFalse:[    
  1691                 icn := self lineTracePointedIcon
  1691                 aMethod hasEnabledTracepoints ifTrue:[ 
       
  1692                     icn := self lineTracePointedIcon
       
  1693                 ] ifFalse:[    
       
  1694                     icn := self disabledBreakpointIcon
       
  1695                 ]    
  1692             ].
  1696             ].
  1693         ].
  1697         ].
  1694     ].
  1698     ].
  1695 
  1699 
  1696     icn isNil ifTrue:[
  1700     icn isNil ifTrue:[