--- a/ClassDescription.st Fri Aug 11 19:38:27 2000 +0200
+++ b/ClassDescription.st Fri Aug 11 19:40:40 2000 +0200
@@ -35,14 +35,14 @@
privateIn:ClassDescription
!
-ClassDescription::PackageRedefinition subclass:#ClassRedefinitionNotification
+ClassDescription::PackageRedefinition subclass:#MethodRedefinitionNotification
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
privateIn:ClassDescription
!
-ClassDescription::PackageRedefinition subclass:#MethodRedefinitionNotification
+ClassDescription::PackageRedefinition subclass:#ClassRedefinitionNotification
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
@@ -547,6 +547,19 @@
"Modified: 23.4.1996 / 15:56:54 / cg"
! !
+!ClassDescription methodsFor:'Compatibility - Dolphin'!
+
+methodsFor
+ "this method allows fileIn of Dolphin methods -
+ return a ClassCategoryReader to read in and compile methods for me.
+ Since Dolphin uses a different way to assign method categories,
+ the loaded methods are temporarily categorized as 'Dolphin methods'
+ and later reassigned, when a categoriesFor: message arrives."
+
+ ^ ClassCategoryReader class:self category:'Dolphin methods'
+
+! !
+
!ClassDescription methodsFor:'Compatibility - ST80'!
organization
@@ -640,19 +653,6 @@
"Created: / 15.6.1998 / 20:36:49 / cg"
! !
-!ClassDescription methodsFor:'Compatibility Dolphin'!
-
-methodsFor
- "this method allows fileIn of Dolphin methods -
- return a ClassCategoryReader to read in and compile methods for me.
- Since Dolphin uses a different way to assign method categories,
- the loaded methods are temporarily categorized as 'Dolphin methods'
- and later reassigned, when a categoriesFor: message arrives."
-
- ^ ClassCategoryReader class:self category:'Dolphin methods'
-
-! !
-
!ClassDescription methodsFor:'accessing'!
category
@@ -3681,21 +3681,21 @@
! !
+!ClassDescription::MethodRedefinitionNotification methodsFor:'queries'!
+
+description
+ ^ 'attempt to redefine method from different package'
+! !
+
!ClassDescription::ClassRedefinitionNotification methodsFor:'queries'!
description
^ 'attempt to redefine class from different package'
! !
-!ClassDescription::MethodRedefinitionNotification methodsFor:'queries'!
-
-description
- ^ 'attempt to redefine method from different package'
-! !
-
!ClassDescription class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.104 2000-07-17 17:15:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.105 2000-08-11 17:40:40 cg Exp $'
! !
ClassDescription initialize!