DebugView.st
changeset 15857 9a3213bfdd68
parent 15835 13df5b55f4cf
child 15859 e0d0455607f4
child 15960 196e6963974c
equal deleted inserted replaced
15855:e8cd02427e78 15857:9a3213bfdd68
  2612     |s|
  2612     |s|
  2613 
  2613 
  2614     aComponent == codeView ifTrue:[
  2614     aComponent == codeView ifTrue:[
  2615         |point localPoint|
  2615         |point localPoint|
  2616 
  2616 
  2617         point := device pointerPosition.
  2617         point := self device pointerPosition.
  2618         localPoint := device translatePointFromRoot:point toView:codeView.
  2618         localPoint := self device translatePointFromRoot:point toView:codeView.
  2619         ((localPoint x between:0 and:codeView width)
  2619         ((localPoint x between:0 and:codeView width)
  2620         and:[localPoint y between:0 and:codeView height])
  2620         and:[localPoint y between:0 and:codeView height])
  2621         ifTrue:[
  2621         ifTrue:[
  2622             ^ self flyByHelpTextFor:codeView at:localPoint
  2622             ^ self flyByHelpTextFor:codeView at:localPoint
  2623         ].
  2623         ].