# HG changeset patch
# User ca
# Date 876922741 -7200
# Node ID a2e23dea36bf5f37b203b202c0142703d1ea375b
# Parent  b895330fc7aa20274a5aff56751e92a87ccac4dc
change className to rowClassName

diff -r b895330fc7aa -r a2e23dea36bf DataSetBuilder.st
--- a/DataSetBuilder.st	Wed Oct 15 12:59:56 1997 +0200
+++ b/DataSetBuilder.st	Wed Oct 15 15:39:01 1997 +0200
@@ -837,24 +837,6 @@
 
 !DataSetBuilder methodsFor:'accessing'!
 
-className
-    ^ (Smalltalk resolveName:className inClass:self class) notNil ifTrue:[className] ifFalse:[nil]
-!
-
-className:aClassName
-    |cls|
-
-    superclassName := nil.
-
-    (className := aClassName) notNil ifTrue:[
-        (cls := self resolveClassNamed) notNil ifTrue:[
-            superclassName := cls superclass name asString.
-        ] ifFalse:[
-            superclassName := 'Object'
-        ]
-    ]
-!
-
 columns
     "returns list of columns
     "
@@ -880,6 +862,25 @@
                                                ifTrue:[list add:'Row Selector'].
         ]
     ].
+!
+
+rowClassName
+    ^ (Smalltalk resolveName:className inClass:self class) notNil ifTrue:[className] ifFalse:[nil]
+!
+
+rowClassName:aClassName
+    |cls|
+
+    superclassName := nil.
+
+    (className := aClassName) notNil ifTrue:[
+        (cls := self resolveClassNamed) notNil ifTrue:[
+            superclassName := cls superclass name asString.
+        ] ifFalse:[
+            superclassName := 'Object'
+        ]
+    ]
+
 ! !
 
 !DataSetBuilder methodsFor:'accessing menu'!
diff -r b895330fc7aa -r a2e23dea36bf UIPainter.st
--- a/UIPainter.st	Wed Oct 15 12:59:56 1997 +0200
+++ b/UIPainter.st	Wed Oct 15 15:39:01 1997 +0200
@@ -1411,12 +1411,12 @@
     aspect := self specTool specification columns.
     editor := DataSetBuilder new.
     editor columns:aspect fromView:(self layoutTool layoutView).
-    editor className:(self specTool specification className).
+    editor rowClassName:(self specTool specification rowClassName).
     editor openModal.
 
     editor hasChanged ifTrue:[
         self specTool specification columns:(editor columns).
-        self specTool specification className:(editor className).
+        self specTool specification rowClassName:(editor rowClassName).
         self modifiedChannel value:true.
     ].
 !