ClassDescription.st
changeset 19926 15b40be3c1a6
parent 19761 253749c085ea
child 19944 c4f52f26c084
--- 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 }"