--- a/Geometric.st	Fri Aug 29 18:40:06 2003 +0200
+++ b/Geometric.st	Fri Aug 29 19:32:16 2003 +0200
@@ -16,7 +16,7 @@
 	instanceVariableNames:''
 	classVariableNames:'Scale InverseScale'
 	poolDictionaries:''
-	category:'Graphics-Geometry'
+	category:'Graphics-Geometry-Objects'
 !
 
 !Geometric class methodsFor:'documentation'!
@@ -526,7 +526,7 @@
 !Geometric class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Geometric.st,v 1.29 2003-02-28 17:20:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Geometric.st,v 1.30 2003-08-29 17:32:16 cg Exp $'
 ! !
 
 Geometric initialize!