--- a/DataSetBuilder.st	Wed Feb 15 18:24:47 2006 +0100
+++ b/DataSetBuilder.st	Wed Feb 15 18:24:54 2006 +0100
@@ -2204,7 +2204,7 @@
           )
          (MenuItem
             activeHelpKey: editPaste
-            enabled: valueOfCanPaste
+            enabled: canPasteHolder
             label: 'Paste'
             itemValue: doPaste
             translateLabel: true
@@ -2448,7 +2448,7 @@
             self updateInfoLabel.
             self updateHistory.
             self clearModifiedFlag.
-            self valueOfEnablingCommitButtons value:false.
+            self enablingCommitButtonsHolder value:false.
         ]
     ].
 
@@ -3088,9 +3088,9 @@
     "remove all changes and reload selected column values"
 
     self updateInputFields.
-    self valueOfEnablingCommitButtons value:false.
+    self enablingCommitButtonsHolder value:false.
     self clearModifiedFlag.
-    self valueOfEnablingCommitButtons value:false.
+    self enablingCommitButtonsHolder value:false.
 
     "Modified: / 27.10.1998 / 14:41:41 / cg"
 !
@@ -3157,7 +3157,7 @@
     columns add:(dscs := DataSetColumnSpec label:label selector:nil) afterIndex:selectedColumnIndex.
     self setDefaultValuesInNewColumn:dscs.
     self seqList add:label afterIndex:selectedColumnIndex.
-    self valueOfEnablingCommitButtons value ifFalse:[
+    self enablingCommitButtonsHolder value ifFalse:[
         self selectedColumnModel value:selectedColumnIndex + 1
     ].
     self cancel.
@@ -3334,7 +3334,7 @@
     columns add:col afterIndex:selectedColumnIndex.
     self seqList add:lbl afterIndex:selectedColumnIndex.
 
-    self valueOfEnablingCommitButtons value ifFalse:[
+    self enablingCommitButtonsHolder value ifFalse:[
         self selectedColumnModel value:selectedColumnIndex + 1
     ].
     self updateColumnView.