Tools__CodeView2.st
changeset 17618 bedd937b4de6
parent 17502 d46156d40277
child 17675 a260495128d3
equal deleted inserted replaced
17617:b0e15ebc84f2 17618:bedd937b4de6
  2636 
  2636 
  2637 update:something with:aParameter from:changedObject
  2637 update:something with:aParameter from:changedObject
  2638     |deltaY numPixels hScrollerHeight|
  2638     |deltaY numPixels hScrollerHeight|
  2639 
  2639 
  2640     (changedObject == textView) ifTrue:[
  2640     (changedObject == textView) ifTrue:[
       
  2641         something == #pointerInView ifTrue:[
       
  2642             ^ self.
       
  2643         ].    
       
  2644 
       
  2645         something == #font ifTrue:[
       
  2646             |sz|
       
  2647             
       
  2648             sz := textView font size.
       
  2649             self font:(self font asSize:sz).
       
  2650             self invalidate.
       
  2651             ^ self.
       
  2652         ].
       
  2653         
  2641         ((something == #sizeOfContents)
  2654         ((something == #sizeOfContents)
  2642         or:[ "false "(something == #visibility)"" ]) ifTrue:[
  2655         or:[ "false "(something == #visibility)"" ]) ifTrue:[
  2643             self adjustSizeForLongestLine.
  2656             self adjustSizeForLongestLine.
  2644 
  2657 
  2645             "/ (numberOfLines ~= (textView list size max:textView cursorLine)) ifTrue:[
  2658             "/ (numberOfLines ~= (textView list size max:textView cursorLine)) ifTrue:[
  2646             "/     self invalidate.
  2659             "/     self invalidate.
  2647             "/ ].
  2660             "/ ].
  2648             ^ self.
  2661             ^ self.
  2649         ].
  2662         ].
       
  2663         
  2650         something == #originOfContents ifTrue:[
  2664         something == #originOfContents ifTrue:[
  2651             aParameter notNil ifTrue:[
  2665             aParameter notNil ifTrue:[
  2652                 deltaY := aParameter y.
  2666                 deltaY := aParameter y.
  2653                 deltaY = 0 ifTrue:[^ self].
  2667                 deltaY = 0 ifTrue:[^ self].
  2654 
  2668 
  2680         ^self.
  2694         ^self.
  2681     ].
  2695     ].
  2682 
  2696 
  2683     super update:something with:aParameter from:changedObject
  2697     super update:something with:aParameter from:changedObject
  2684 
  2698 
  2685     "Modified (format): / 15-07-2011 / 20:14:04 / cg"
       
  2686     "Modified: / 14-02-2014 / 12:08:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  2699     "Modified: / 14-02-2014 / 12:08:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
  2700     "Modified: / 12-08-2017 / 13:21:08 / cg"
  2687 ! !
  2701 ! !
  2688 
  2702 
  2689 !CodeView2::GutterView methodsFor:'event handling'!
  2703 !CodeView2::GutterView methodsFor:'event handling'!
  2690 
  2704 
  2691 buttonMultiPress: btn x: x y: y
  2705 buttonMultiPress: btn x: x y: y