class: Tools::CodeView2
authorClaus Gittinger <cg@exept.de>
Mon, 09 Mar 2015 12:11:58 +0100
changeset 15520 ee71c6d3d759
parent 15519 a511131fe6b9
child 15521 fb618bbd9037
class: Tools::CodeView2 gutterview redrw fix. Sometimes, the vertical separating line was not drawn (after a resize-smaller)
Tools__CodeView2.st
--- a/Tools__CodeView2.st	Mon Mar 09 11:12:13 2015 +0100
+++ b/Tools__CodeView2.st	Mon Mar 09 12:11:58 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague
               All Rights Reserved
@@ -2536,7 +2538,7 @@
                         numPixels := numPixels + 4.
                         self invalidateX:0 y:height-numPixels-hScrollerHeight width:width height:numPixels+hScrollerHeight.
                     ].
-                    self repairDamage.
+                    "/ self repairDamage.
                     ^ self.
                 ].
             ].
@@ -2644,8 +2646,8 @@
 
 sizeChanged:how
     super sizeChanged:how.
-    self invalidateAcceptCancelBar.
-
+    "/ self invalidateAcceptCancelBar.
+    self invalidate.
     "Created: / 10-09-2013 / 03:19:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
@@ -2808,12 +2810,14 @@
 invalidateAcceptCancelBar
     | w |
 
+    self usedWidthForAcceptCancel == 0 ifTrue:[^ self].
     w := self acceptCancelRight.
     w == 0 ifTrue:[ ^ self ].
+
     self
         invalidateX: 0
                   y: 0
-              width: w
+              width: w-1
              height: self height.
 
     "Created: / 10-09-2013 / 03:07:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -2827,7 +2831,7 @@
 invalidateLines
 
     | x0 |
-    x0 := self acceptCancelRight + 1.
+    x0 := self acceptCancelRight "+ 1".
     self
         invalidateX: x0
                   y: 0
@@ -2884,7 +2888,7 @@
 
     "separator line is drawn in grey"
     savPaint := self paint.
-    self paint:Color gray.
+    self paint:Color red.
 
     self 
         displayLineFromX:(width - 1)
@@ -2893,7 +2897,7 @@
         y:(y+h).
 
     self paint:savPaint.
-
+self halt.
     "Created: / 14-12-2009 / 13:15:53 / Jindra <a>"
     "Modified: / 14-12-2009 / 15:09:54 / Jindra <a>"
     "Modified: / 17-08-2011 / 15:12:47 / cg"
@@ -4248,15 +4252,15 @@
 !CodeView2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.186 2015-02-28 03:16:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.187 2015-03-09 11:11:58 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.186 2015-02-28 03:16:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.187 2015-03-09 11:11:58 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeView2.st,v 1.186 2015-02-28 03:16:09 cg Exp $'
+    ^ '$Id: Tools__CodeView2.st,v 1.187 2015-03-09 11:11:58 cg Exp $'
 ! !