Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Wed, 21 Jul 1999 15:06:21 +0200
changeset 2806 3dcf15761c17
parent 2805 2efe543c9788
child 2807 d65200e6a0d6
checkin from browser
GC.st file | annotate | diff | comparison | revisions
GraphicsContext.st file | annotate | diff | comparison | revisions 
--- a/GC.st	Thu Jul 15 21:44:57 1999 +0200
+++ b/GC.st	Wed Jul 21 15:06:21 1999 +0200
@@ -491,7 +491,7 @@
     ^ #round
 ! !
 
-!GraphicsContext methodsFor:'ST-80 compatibility'!
+!GraphicsContext methodsFor:'ST-80 - compatibility'!
 
 findFont:aFontDescription
     "given a fontDescription, return a device font for it
@@ -558,7 +558,7 @@
     "Modified: 28.5.1996 / 20:22:18 / cg"
 ! !
 
-!GraphicsContext methodsFor:'ST-80 displaying'!
+!GraphicsContext methodsFor:'ST-80 - displaying'!
 
 displayArc:origin radius:radius from:startAngle angle:angle
     "draw an arc around a point"
@@ -641,6 +641,12 @@
 	     angle:sweepAngle
 ! !
 
+!GraphicsContext methodsFor:'Squeak - displaying'!
+
+fillWhite
+    self fill:Color white
+! !
+
 !GraphicsContext methodsFor:'accessing'!
 
 backgroundPaint
@@ -2152,6 +2158,6 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/GC.st,v 1.80 1999-07-07 12:47:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/GC.st,v 1.81 1999-07-21 13:06:21 cg Exp $'
 ! !
 GraphicsContext initialize!
--- a/GraphicsContext.st	Thu Jul 15 21:44:57 1999 +0200
+++ b/GraphicsContext.st	Wed Jul 21 15:06:21 1999 +0200
@@ -491,7 +491,7 @@
     ^ #round
 ! !
 
-!GraphicsContext methodsFor:'ST-80 compatibility'!
+!GraphicsContext methodsFor:'ST-80 - compatibility'!
 
 findFont:aFontDescription
     "given a fontDescription, return a device font for it
@@ -558,7 +558,7 @@
     "Modified: 28.5.1996 / 20:22:18 / cg"
 ! !
 
-!GraphicsContext methodsFor:'ST-80 displaying'!
+!GraphicsContext methodsFor:'ST-80 - displaying'!
 
 displayArc:origin radius:radius from:startAngle angle:angle
     "draw an arc around a point"
@@ -641,6 +641,12 @@
 	     angle:sweepAngle
 ! !
 
+!GraphicsContext methodsFor:'Squeak - displaying'!
+
+fillWhite
+    self fill:Color white
+! !
+
 !GraphicsContext methodsFor:'accessing'!
 
 backgroundPaint
@@ -2152,6 +2158,6 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.80 1999-07-07 12:47:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.81 1999-07-21 13:06:21 cg Exp $'
 ! !
 GraphicsContext initialize!
hg/stx-libview