fill/drawArc..w:h:.. renamed to ...width:height:...
authorClaus Gittinger <cg@exept.de>
Wed, 08 May 1996 13:52:25 +0200
changeset 618 fc7c7e0ec35d
parent 617 cb465ce8ea43
child 619 ea9172634006
fill/drawArc..w:h:.. renamed to ...width:height:...
MenuView.st
--- a/MenuView.st	Wed May 08 09:48:08 1996 +0200
+++ b/MenuView.st	Wed May 08 13:52:25 1996 +0200
@@ -1412,8 +1412,8 @@
          fill the arcs
         "
         self paint:hilightBgColor.
-        self fillArcX:1+margin+1 y:y w:r2 h:r2+1+1 from:90 angle:180. 
-        self fillArcX:width-r2-1-1-margin-1 y:y w:r2 h:r2+1+1 from:270 angle:180. 
+        self fillArcX:1+margin+1 y:y width:r2 height:r2+1+1 from:90 angle:180. 
+        self fillArcX:width-r2-1-1-margin-1 y:y width:r2 height:r2+1+1 from:270 angle:180. 
 
         "
          a highlight-border around
@@ -1423,8 +1423,8 @@
             self displayLineFromX:radius+2 y:y toX:width-radius-3 y:y.
             self displayLineFromX:radius+2 y:y2 toX:width-radius-3 y:y2.
 
-            self displayArcX:1+margin+1 y:y w:r2 h:r2+1+1 from:90 angle:180. 
-            self displayArcX:width-r2-1-1-margin-1 y:y w:r2 h:r2+1+1 from:270 angle:180. 
+            self displayArcX:1+margin+1 y:y width:r2 height:r2+1+1 from:90 angle:180. 
+            self displayArcX:width-r2-1-1-margin-1 y:y width:r2 height:r2+1+1 from:270 angle:180. 
             ^ self
         ].
 
@@ -1443,21 +1443,21 @@
             self paint:topLeftColor.
             self displayLineFromX:radius+2 y:y toX:width-radius-3 y:y.
 
-            self displayArcX:1+margin+1 y:y w:r2 h:r2+1+1 from:90 angle:125. 
-            self displayArcX:width-r2-1-1-margin-1 y:y w:r2 h:r2+1+1 from:270+125 angle:55. 
+            self displayArcX:1+margin+1 y:y width:r2 height:r2+1+1 from:90 angle:125. 
+            self displayArcX:width-r2-1-1-margin-1 y:y width:r2 height:r2+1+1 from:270+125 angle:55. 
 
             self paint:botRightColor.
 
             self displayLineFromX:radius+2 y:y2 toX:width-radius-3 y:y2.
-            self displayArcX:1+margin+1 y:y w:r2 h:r2+1+1 from:90+125 angle:55. 
-            self displayArcX:width-r2-1-1-margin-1 y:y w:r2 h:r2+1+1 from:270 angle:125. 
+            self displayArcX:1+margin+1 y:y width:r2 height:r2+1+1 from:90+125 angle:55. 
+            self displayArcX:width-r2-1-1-margin-1 y:y width:r2 height:r2+1+1 from:270 angle:125. 
         ].
         ^ self
     ].
     ^ super drawVisibleLine:visLineNr with:fg and:bg
 
     "Created: 28.2.1996 / 18:41:17 / cg"
-    "Modified: 28.2.1996 / 19:42:57 / cg"
+    "Modified: 8.5.1996 / 08:43:29 / cg"
 ! !
 
 !MenuView methodsFor:'event handling'!
@@ -2453,5 +2453,5 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.74 1996-04-30 13:55:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.75 1996-05-08 11:52:25 cg Exp $'
 ! !