ArrowButton.st
changeset 24 966098a893f8
parent 18 66bf62e27141
child 38 4b9b70b2cc87
--- a/ArrowButton.st	Sat Jan 08 18:31:31 1994 +0100
+++ b/ArrowButton.st	Thu Jan 13 01:18:51 1994 +0100
@@ -25,7 +25,7 @@
 
 Buttons of scrollbars - show arrows.
 
-$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.3 1994-01-08 17:22:45 claus Exp $
+$Header: /cvs/stx/stx/libwidg/ArrowButton.st,v 1.4 1994-01-13 00:14:23 claus Exp $
 
 written summer 93 by claus
 '!
@@ -238,34 +238,34 @@
         self clear.
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX-1   y:labelOriginY - 1 .
+        self displayOpaqueForm:logo x:labelOriginX-1   y:labelOriginY - 1 .
         self foreground:topLeft background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX-1  y:labelOriginY - 1.
+        self displayOpaqueForm:logo x:labelOriginX-1  y:labelOriginY - 1.
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX   y:labelOriginY - 1 .
+        self displayOpaqueForm:logo x:labelOriginX   y:labelOriginY - 1 .
         self foreground:topLeft background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX  y:labelOriginY - 1.
+        self displayOpaqueForm:logo x:labelOriginX  y:labelOriginY - 1.
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX -1   y:labelOriginY  .
+        self displayOpaqueForm:logo x:labelOriginX -1   y:labelOriginY  .
         self foreground:topLeft background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX -1 y:labelOriginY .
+        self displayOpaqueForm:logo x:labelOriginX -1 y:labelOriginY .
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX + 1  y:labelOriginY  .
+        self displayOpaqueForm:logo x:labelOriginX + 1  y:labelOriginY  .
         self foreground:botRight background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX + 1 y:labelOriginY .
+        self displayOpaqueForm:logo x:labelOriginX + 1 y:labelOriginY .
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX + 1  y:labelOriginY + 1 .
+        self displayOpaqueForm:logo x:labelOriginX + 1  y:labelOriginY + 1 .
         self foreground:botRight background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX + 1 y:labelOriginY + 1.
+        self displayOpaqueForm:logo x:labelOriginX + 1 y:labelOriginY + 1.
 
         self foreground:(Color noColor) background:(Color allColor) function:#and.
-        self drawOpaqueForm:logo x:labelOriginX   y:labelOriginY  .
+        self displayOpaqueForm:logo x:labelOriginX   y:labelOriginY  .
         self foreground:bg background:(Color noColor) function:#or.
-        self drawOpaqueForm:logo x:labelOriginX  y:labelOriginY .
+        self displayOpaqueForm:logo x:labelOriginX  y:labelOriginY .
 
         self function:#copy