#UI_ENHANCEMENT
authorClaus Gittinger <cg@exept.de>
Wed, 23 Mar 2016 17:53:31 +0100
changeset 16173 438d42e1e67b
parent 16172 39b0d187be9e
child 16174 0cbca08311bb
#UI_ENHANCEMENT class: AbstractSettingsApplication
AbstractSettingsApplication.st
--- a/AbstractSettingsApplication.st	Wed Mar 23 17:48:22 2016 +0100
+++ b/AbstractSettingsApplication.st	Wed Mar 23 17:53:31 2016 +0100
@@ -8060,6 +8060,7 @@
                                      label: 'Bridge Server Enabled'
                                      name: 'CheckBox7'
                                      layout: (LayoutFrame 5 0 0 0 600 0 25 0)
+                                     enableChannel: hasSmalltalkBridge
                                      model: smalltalkBridgeEnabled
                                      translateLabel: true
                                    )
@@ -12064,7 +12065,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box2'
@@ -12077,6 +12078,7 @@
                                layout: (LayoutFrame 0 0 0 0 150 0 22 0)
                                translateLabel: true
                                adjust: right
+                               enableDisableColorChannel: rDoitsEnabled
                              )
                             (InputFieldSpec
                                name: 'EntryField1'
@@ -12094,11 +12096,12 @@
                                layout: (LayoutFrame 150 0 28 0 596 0 50 0)
                                translateLabel: true
                                adjust: left
+                               enableDisableColorChannel: rDoitsEnabled
                              )
                             )
                           
                          )
-                         extent: (Point 555 60)
+                         extent: (Point 567 60)
                        )
                       (ViewSpec
                          name: 'Box13'
@@ -12116,7 +12119,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box3'
@@ -12134,7 +12137,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box4'
@@ -12152,7 +12155,7 @@
                             )
                           
                          )
-                         extent: (Point 555 24)
+                         extent: (Point 567 24)
                        )
                       (ViewSpec
                          name: 'Box5'
@@ -12170,7 +12173,7 @@
                             )
                           
                          )
-                         extent: (Point 555 23)
+                         extent: (Point 567 23)
                        )
                       )
                     
@@ -12216,7 +12219,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box12'
@@ -12229,6 +12232,7 @@
                                layout: (LayoutFrame 0 0 0 0 150 0 22 0)
                                translateLabel: true
                                adjust: right
+                               enableDisableColorChannel: scriptingEnabled
                              )
                             (InputFieldSpec
                                name: 'EntryField2'
@@ -12252,7 +12256,7 @@
                             )
                           
                          )
-                         extent: (Point 555 60)
+                         extent: (Point 567 60)
                        )
                       (ViewSpec
                          name: 'Box11'
@@ -12270,7 +12274,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box8'
@@ -12288,7 +12292,7 @@
                             )
                           
                          )
-                         extent: (Point 555 25)
+                         extent: (Point 567 25)
                        )
                       (ViewSpec
                          name: 'Box9'
@@ -12306,7 +12310,7 @@
                             )
                           
                          )
-                         extent: (Point 555 24)
+                         extent: (Point 567 24)
                        )
                       (ViewSpec
                          name: 'Box10'
@@ -12324,7 +12328,7 @@
                             )
                           
                          )
-                         extent: (Point 555 23)
+                         extent: (Point 567 23)
                        )
                       )