--- a/GraphicsContext.st	Tue Feb 24 16:54:33 1998 +0100
+++ b/GraphicsContext.st	Wed Feb 25 14:17:31 1998 +0100
@@ -1467,6 +1467,16 @@
     "Modified: 13.4.1996 / 20:58:31 / cg"
 !
 
+displayRectangleOrigin:origin extent:extent
+    "draw a rectangle"
+
+    self displayRectangleX:(origin x) y:(origin y)
+                     width:(extent x)
+                    height:(extent y)
+
+    "Modified: 13.4.1996 / 20:58:31 / cg"
+!
+
 displayString:aString at:aPoint
     "draw a string - drawing fg only"
 
@@ -2005,6 +2015,6 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.65 1998-01-29 12:23:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.66 1998-02-25 13:17:31 ca Exp $'
 ! !
 GraphicsContext initialize!