Tools__CodeView2.st
changeset 12869 95b46e1e58f8
parent 12868 79e40dd37b08
child 12870 798d611cfd62
equal deleted inserted replaced
12868:79e40dd37b08 12869:95b46e1e58f8
  2938 !
  2938 !
  2939 
  2939 
  2940 buttonPress: button x: x y: y
  2940 buttonPress: button x: x y: y
  2941     | ctrlDown  |
  2941     | ctrlDown  |
  2942 
  2942 
  2943 Transcript showCR:'p'.
       
  2944     (codeView buttonPress:button x:x y:y in: self)
  2943     (codeView buttonPress:button x:x y:y in: self)
  2945         ifFalse:[Transcript showCR:'sp'. super buttonPress:button x:x y:y].
  2944         ifFalse:[Transcript showCR:'sp'. super buttonPress:button x:x y:y].
  2946     "
  2945     "
  2947     ((ctrlDown := self sensor ctrlDown) and: [ codeView syntaxElementSelection notNil]) 
  2946     ((ctrlDown := self sensor ctrlDown) and: [ codeView syntaxElementSelection notNil]) 
  2948         ifTrue: [codeView buttonPressInTextView: button x:x y:y ctrlDown: ctrlDown].
  2947         ifTrue: [codeView buttonPressInTextView: button x:x y:y ctrlDown: ctrlDown].
  2955     "Created: / 14-02-2010 / 18:12:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  2954     "Created: / 14-02-2010 / 18:12:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  2956     "Modified: / 06-03-2010 / 20:37:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  2955     "Modified: / 06-03-2010 / 20:37:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  2957 !
  2956 !
  2958 
  2957 
  2959 buttonRelease: button x: x y: y
  2958 buttonRelease: button x: x y: y
  2960 Transcript showCR:'r'.
       
  2961     (codeView buttonRelease:button x:x y:y in: self)
  2959     (codeView buttonRelease:button x:x y:y in: self)
  2962         ifFalse:[Transcript showCR:'sp'. super buttonRelease:button x:x y:y].
  2960         ifFalse:[Transcript showCR:'sp'. super buttonRelease:button x:x y:y].
  2963 !
  2961 !
  2964 
  2962 
  2965 exposeX:x y:y width:w height:h 
  2963 exposeX:x y:y width:w height:h 
  3456 ! !
  3454 ! !
  3457 
  3455 
  3458 !CodeView2 class methodsFor:'documentation'!
  3456 !CodeView2 class methodsFor:'documentation'!
  3459 
  3457 
  3460 version
  3458 version
  3461     ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.75 2013-06-06 17:41:38 cg Exp $'
  3459     ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.76 2013-06-06 17:42:27 cg Exp $'
  3462 !
  3460 !
  3463 
  3461 
  3464 version_CVS
  3462 version_CVS
  3465     ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.75 2013-06-06 17:41:38 cg Exp $'
  3463     ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.76 2013-06-06 17:42:27 cg Exp $'
  3466 !
  3464 !
  3467 
  3465 
  3468 version_SVN
  3466 version_SVN
  3469     ^ '$Id: Tools__CodeView2.st,v 1.75 2013-06-06 17:41:38 cg Exp $'
  3467     ^ '$Id: Tools__CodeView2.st,v 1.76 2013-06-06 17:42:27 cg Exp $'
  3470 ! !
  3468 ! !
  3471 
  3469 
  3472 
  3470 
  3473 CodeView2 initialize!
  3471 CodeView2 initialize!