#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Thu, 13 Jul 2017 13:19:47 +0200
changeset 22004 1dc92f5811b3
parent 22003 1a4affe1e22c
child 22005 c22b8f19cf2e
#FEATURE by cg class: ClassDescription
ClassDescription.st
--- a/ClassDescription.st	Thu Jul 13 12:32:29 2017 +0200
+++ b/ClassDescription.st	Thu Jul 13 13:19:47 2017 +0200
@@ -824,6 +824,13 @@
     "Created: / 28.3.1998 / 21:21:52 / cg"
 ! !
 
+!ClassDescription methodsFor:'Compatibility-Squeak'!
+
+protocols
+    ^ self categories
+
+    "Created: / 13-07-2017 / 13:16:33 / cg"
+! !
 
 !ClassDescription methodsFor:'Compatibility-V''Age'!