Tools__ChangeList.st
branchdefault-browser-environment
changeset 13473 d8e9ed472e9f
parent 12666 c90e266fc135
equal deleted inserted replaced
13464:931d28c589b7 13473:d8e9ed472e9f
   746                         [methodsOnly := false]
   746                         [methodsOnly := false]
   747             ]
   747             ]
   748         ]
   748         ]
   749     ].
   749     ].
   750 
   750 
   751     browserClass := Smalltalk browserClass.
   751     browserClass := environment browserClass.
   752     methodsOnly 
   752     methodsOnly 
   753         ifTrue:
   753         ifTrue:
   754             [methods size = 1 
   754             [methods size = 1 
   755                 ifTrue:[ browserClass openInMethod: methods anyOne]
   755                 ifTrue:[ browserClass openInMethod: methods anyOne]
   756                 ifFalse:[ browserClass browseMethods: methods asArray title: 'Selected methods from changeset' sort: true]]
   756                 ifFalse:[ browserClass browseMethods: methods asArray title: 'Selected methods from changeset' sort: true]]