--- a/PrivateMetaclass.st	Tue Oct 15 21:36:00 1996 +0200
+++ b/PrivateMetaclass.st	Tue Oct 15 21:37:17 1996 +0200
@@ -47,10 +47,18 @@
 
 isBuiltInClass
      ^ self == PrivateMetaclass
+!
+
+package
+    "return my package-id"
+
+    ^ owningClass package
+
+    "Created: 15.10.1996 / 19:45:04 / cg"
 ! !
 
 !PrivateMetaclass class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PrivateMetaclass.st,v 1.6 1996-10-15 18:01:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PrivateMetaclass.st,v 1.7 1996-10-15 19:37:17 cg Exp $'
 ! !