--- a/DataSetBuilder.st	Thu Feb 18 13:54:09 1999 +0100
+++ b/DataSetBuilder.st	Thu Feb 18 13:57:04 1999 +0100
@@ -22,7 +22,7 @@
 	category:'Interface-UIPainter'
 !
 
-Array subclass:#Row
+Array variableSubclass:#Row
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
@@ -1562,23 +1562,23 @@
                     nil
                 )
             )
-             #(#MenuItem
-                #label: 'Settings'
-                #translateLabel: true
-                #activeHelpKey: #settings
-                #submenu: 
-                 #(#Menu
-                    
-                     #(
-                       #(#MenuItem
-                          #label: 'Fonts'
-                          #translateLabel: true
-                          #submenuChannel: #menuFont
-                      )
-                    ) nil
-                    nil
-                )
-            )
+"/             #(#MenuItem
+"/                #label: 'Settings'
+"/                #translateLabel: true
+"/                #activeHelpKey: #settings
+"/                #submenu: 
+"/                 #(#Menu
+"/                    
+"/                     #(
+"/                       #(#MenuItem
+"/                          #label: 'Fonts'
+"/                          #translateLabel: true
+"/                          #submenuChannel: #menuFont
+"/                      )
+"/                    ) nil
+"/                    nil
+"/                )
+"/            )
              #(#MenuItem
                 #label: 'History'
                 #translateLabel: true
@@ -2496,7 +2496,7 @@
         ]
     ].
     self specChannel value:specSelector.
-    (self window notNil and: [self window shown]) ifTrue: [self updateFonts]
+"/    (self window notNil and: [self window shown]) ifTrue: [self updateFonts]
 
 ! !