ClassDescription.st
changeset 14627 c2fe9f27bd12
parent 14618 f3fb1c645c67
child 14702 8311953750d6
child 18011 deb0c3355881
equal deleted inserted replaced
14626:7dc0ee28824f 14627:c2fe9f27bd12
  2830             nextPutAll:self nameWithoutPrefix;
  2830             nextPutAll:self nameWithoutPrefix;
  2831             nextPutAll:' (private in ';
  2831             nextPutAll:' (private in ';
  2832             nextPutAll:self owningClass name;
  2832             nextPutAll:self owningClass name;
  2833             nextPut:$).
  2833             nextPut:$).
  2834     ] ifFalse:[
  2834     ] ifFalse:[
  2835         aGCOrStream nextPutAll:self name.
  2835         aGCOrStream nextPutAll:self name ? '*unnamed*'.
  2836     ].
  2836     ].
  2837 
  2837 
  2838     cat := self category.
  2838     cat := self category.
  2839     (cat = 'obsolete'
  2839     (cat = 'obsolete'
  2840      or:[cat = '* obsolete *']) ifTrue:[
  2840      or:[cat = '* obsolete *']) ifTrue:[
  4227 ! !
  4227 ! !
  4228 
  4228 
  4229 !ClassDescription class methodsFor:'documentation'!
  4229 !ClassDescription class methodsFor:'documentation'!
  4230 
  4230 
  4231 version
  4231 version
  4232     ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.229 2012-12-21 18:41:12 stefan Exp $'
  4232     ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.230 2013-01-03 09:20:11 cg Exp $'
  4233 !
  4233 !
  4234 
  4234 
  4235 version_CVS
  4235 version_CVS
  4236     ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.229 2012-12-21 18:41:12 stefan Exp $'
  4236     ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.230 2013-01-03 09:20:11 cg Exp $'
  4237 ! !
  4237 ! !
  4238 
  4238 
  4239 
  4239 
  4240 ClassDescription initialize!
  4240 ClassDescription initialize!
  4241 ClassDescription::MethodRedefinitionNotification initialize!
  4241 ClassDescription::MethodRedefinitionNotification initialize!