#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Sat, 14 May 2016 15:38:45 +0200
changeset 19833 2c27676f3588
parent 19832 f20ea3e31ce4
child 19834 b9fe049ed8c2
#REFACTORING by cg class: Behavior removed: #VS comment/format in: #documentation changed: #whichClassDefinesClassVar:
Behavior.st
--- a/Behavior.st	Sat May 14 15:28:07 2016 +0200
+++ b/Behavior.st	Sat May 14 15:38:45 2016 +0200
@@ -22,10 +22,6 @@
 
 !Behavior class methodsFor:'documentation'!
 
-VS
-    ^ '§Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.315 2011/11/29 10:20:21 cg Exp §'
-!
-
 copyright
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
@@ -53,13 +49,14 @@
     any instance of Behavior (i.e. any class) will return an instance of that class).
 
 
-    Behavior provides minimum support for all classes - additional stuff is
-    found in ClassDescription and Class. Behaviors provides all mechanisms needed
-    to create instances, and send messages to those. However, Behavior does not provide
-    all the (symbolic) information needed to compile methods for a class or to get
-    useful information in inspectors.
-
-    for experts:
+    Behavior provides minimum support for all class-like objects, which define behavior
+    of other objects. Additional stuff (meta info) is found in ClassDescription and Class. 
+    Behavior provides all mechanisms needed to create instances (on the class side), 
+    and send messages to them. 
+    However, Behavior does not provide the (symbolic) information needed to compile methods 
+    for a class or to get useful information in inspectors or browsers.
+
+    For experts:
 
     Since instances of Behavior provide all that is needed to interact with the VM's
     message dispatch mechanism, these can be used as 'light weight' classes.
@@ -74,25 +71,25 @@
 
     [Instance variables:]
 
-	superclass        <Class>            the classes superclass
-
-	methodDictionary  <MethodDictionary> inst-selectors and methods
-
-	instSize          <SmallInteger>     the number of instance variables
-
-	flags             <SmallInteger>     special flag bits coded in a number
-					     not for application use
+        superclass        <Class>            the classes superclass
+
+        methodDictionary  <MethodDictionary> inst-selectors and methods
+
+        instSize          <SmallInteger>     the number of instance variables
+
+        flags             <SmallInteger>     special flag bits coded in a number
+                                             not for application use
 
     flag bits (see stc.h):
 
     NOTICE: layout known by compiler and runtime system; be careful when changing
 
     [author:]
-	Claus Gittinger
+        Claus Gittinger
 
     [see also:]
-	Class ClassDescription Metaclass
-	Method MethodDictionary
+        Class ClassDescription Metaclass
+        Method MethodDictionary
 "
 !
 
@@ -5119,10 +5116,9 @@
 !
 
 whichClassDefinesClassVar:aStringOrText
-    |name|
-
-    name := aStringOrText asString string.
-    ^ self whichClassSatisfies:[:aClass | aClass classVarNames includes:name]
+    "Behavior does not support classVariables"
+
+    ^ nil
 
     "
      TextView whichClassDefinesClassVar:'CachedScales'