equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1993 by Claus Gittinger |
4 COPYRIGHT (c) 1993 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
828 "for ST80 compatibility but without functionality" |
830 "for ST80 compatibility but without functionality" |
829 |
831 |
830 "Created: / 28.3.1998 / 21:21:52 / cg" |
832 "Created: / 28.3.1998 / 21:21:52 / cg" |
831 ! ! |
833 ! ! |
832 |
834 |
833 |
|
834 !ClassDescription methodsFor:'Compatibility-V''Age'! |
835 !ClassDescription methodsFor:'Compatibility-V''Age'! |
835 |
836 |
836 categoriesFor:aSelector are:listOfCategories |
837 categoriesFor:aSelector are:listOfCategories |
837 "to allow fileIn of V'Age code. |
838 "to allow fileIn of V'Age code. |
838 Set the category of the method which is installed under aSelector. |
839 Set the category of the method which is installed under aSelector. |
1115 "Modified: 22.8.1997 / 14:59:14 / cg" |
1116 "Modified: 22.8.1997 / 14:59:14 / cg" |
1116 ! |
1117 ! |
1117 |
1118 |
1118 nameSpace |
1119 nameSpace |
1119 "should be redefined in concrete subclass(es)" |
1120 "should be redefined in concrete subclass(es)" |
|
1121 |
|
1122 ^ nil |
|
1123 ! |
|
1124 |
|
1125 projectDefinitionClass |
|
1126 "return the project definition of the classes' package. |
|
1127 Here, nil is returned. Only full classes have one." |
1120 |
1128 |
1121 ^ nil |
1129 ^ nil |
1122 ! |
1130 ! |
1123 |
1131 |
1124 renameCategory:oldCategory to:newCategory |
1132 renameCategory:oldCategory to:newCategory |