--- a/Object.st	Fri Sep 07 15:10:43 2001 +0200
+++ b/Object.st	Fri Sep 07 17:35:45 2001 +0200
@@ -2774,6 +2774,18 @@
     "Modified: 18.5.1996 / 15:43:25 / cg"
 !
 
+browse
+    "open a browser on the receivers class"
+
+    self class theNonMetaclass browse
+
+    "
+     10 browse
+     Collection browse
+     Collection class browse
+    "
+!
+
 inspect
     "{ Pragma: +optSpace }"
 
@@ -8368,6 +8380,6 @@
 !Object class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.365 2001-09-07 10:57:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.366 2001-09-07 15:35:45 cg Exp $'
 ! !
 Object initialize!