--- a/ClassCategoryReader.st	Tue Nov 27 18:59:40 2001 +0100
+++ b/ClassCategoryReader.st	Tue Nov 27 19:03:05 2001 +0100
@@ -95,6 +95,12 @@
 
 !ClassCategoryReader class methodsFor:'instance creation'!
 
+class:aClass
+    "return a new ClassCategoryReader to operate on aClass"
+
+    ^ self new class:aClass
+!
+
 class:aClass category:aCategory
     "return a new ClassCategoryReader to read methods for aClass with
      methodCategory aCategory"
@@ -427,6 +433,6 @@
 !ClassCategoryReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.47 2001-11-19 12:37:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.48 2001-11-27 18:03:05 cg Exp $'
 ! !
 ClassCategoryReader initialize!