--- a/ClassDescription.st Thu Jun 02 21:07:19 2016 +0200
+++ b/ClassDescription.st Fri Jun 03 03:00:44 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
@@ -830,7 +832,6 @@
"Created: / 28.3.1998 / 21:21:52 / cg"
! !
-
!ClassDescription methodsFor:'Compatibility-V''Age'!
categoriesFor:aSelector are:listOfCategories
@@ -1121,6 +1122,13 @@
^ nil
!
+projectDefinitionClass
+ "return the project definition of the classes' package.
+ Here, nil is returned. Only full classes have one."
+
+ ^ nil
+!
+
renameCategory:oldCategory to:newCategory
"{ Pragma: +optSpace }"