--- a/Geometric.st	Mon Feb 10 13:20:50 1997 +0100
+++ b/Geometric.st	Mon Feb 10 14:47:06 1997 +0100
@@ -341,10 +341,32 @@
     ^ false
 
     "Created: 1.6.1996 / 11:28:58 / cg"
+!
+
+outlineIntersects:aRectangle
+    "return true, if the receivers image intersects
+     aRectangle, when drawn as an outline.
+     Here, all we can do is to ask the boundary rectangle;
+     subclasses should reimplement better checks."
+
+    ^ self bounds intersects:aRectangle
+
+    "Modified: 10.2.1997 / 13:40:36 / cg"
+!
+
+regionIntersects:aRectangle
+    "return true, if the receivers image intersects
+     aRectangle, when drawn as a filled version.
+     Here, all we can do is to ask the boundary rectangle;
+     subclasses should reimplement better checks."
+
+    ^ self bounds intersects:aRectangle
+
+    "Modified: 10.2.1997 / 13:40:00 / cg"
 ! !
 
 !Geometric class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Geometric.st,v 1.20 1996-06-01 09:29:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Geometric.st,v 1.21 1997-02-10 13:47:06 cg Exp $'
 ! !