*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 18 Apr 2005 17:59:13 +0200
changeset 4379 02ac555f6b0a
parent 4378 29da8415352c
child 4380 46328c4ff748
*** empty log message ***
GraphicsContext.st
--- a/GraphicsContext.st	Thu Apr 14 11:11:54 2005 +0200
+++ b/GraphicsContext.st	Mon Apr 18 17:59:13 2005 +0200
@@ -547,6 +547,12 @@
     ^ self displayPolygon:aPolygon 
 !
 
+displayRectangularBorder:aRectangle
+    "draw a rectangle - ST-80 compatibility"
+
+    self displayRectangle:aRectangle
+!
+
 displayRectangularBorder:aRectangle at:aPoint
     "draw a rectangle - ST-80 compatibility"
 
@@ -2303,7 +2309,7 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.106 2005-04-12 15:15:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.107 2005-04-18 15:59:13 cg Exp $'
 ! !
 
 GraphicsContext initialize!