--- a/DataSetBuilder.st Mon Jan 19 09:24:19 1998 +0100
+++ b/DataSetBuilder.st Mon Jan 19 10:59:39 1998 +0100
@@ -1143,7 +1143,6 @@
)
#(#MenuItem
#'label:' 'File'
- #'accessCharacterPosition:' 1
#'submenu:'
#(#Menu
@@ -1176,7 +1175,6 @@
)
#(#MenuItem
#'label:' 'Edit'
- #'accessCharacterPosition:' 1
#'submenuChannel:' #menuEdit
)
) nil
@@ -1407,6 +1405,16 @@
!
+modifiedChannel
+ "returns a boolean value holder which is set to true if something is modified
+ and not accepted"
+
+ ^builder booleanValueAspectFor:#modifiedChannel
+
+
+
+!
+
rendererTypeList
"generate list of supported renderer types"