added: #sampleModuleList
authorClaus Gittinger <cg@exept.de>
Mon, 12 Mar 2012 12:09:21 +0100
changeset 11409 b38f02e321be
parent 11408 adc1a0348abb
child 11410 3ee77aa6232e
added: #sampleModuleList
FileBasedSourceCodeManagementSettingsAppl.st
--- a/FileBasedSourceCodeManagementSettingsAppl.st	Mon Mar 12 12:07:30 2012 +0100
+++ b/FileBasedSourceCodeManagementSettingsAppl.st	Mon Mar 12 12:09:21 2012 +0100
@@ -208,12 +208,22 @@
                                 component: 
                                (SpecCollection
                                   collection: (
+                                   (ComboBoxSpec
+                                      name: 'ComboBox1'
+                                      layout: (LayoutFrame 64 0.25 207 0 0 1 229 0)
+                                      activeHelpKey: perModuleModule
+                                      tabable: true
+                                      model: perModulePathModule
+                                      acceptChannel: acceptChannel
+                                      acceptOnPointerLeave: true
+                                      comboList: sampleModuleList
+                                    )
                                    (CheckBoxSpec
                                       label: 'Show in Browser Menus'
                                       name: 'CheckBox1'
                                       layout: (LayoutFrame 0 0 5 0 0 1 27 0)
+                                      activeHelpKey: shownInBrowserMenus
                                       model: shownInBrowserMenusHolder
-                                activeHelpKey: shownInBrowserMenus
                                       translateLabel: true
                                     )
                                    (ViewSpec
@@ -272,15 +282,6 @@
                                       translateLabel: true
                                       adjust: right
                                     )
-                                   (InputFieldSpec
-                                      name: 'perModulePathModuleEntryField'
-                                      layout: (LayoutFrame 64 0.25 207 0 0 1 229 0)
-                                      activeHelpKey: perModuleModule
-                                      tabable: true
-                                      model: perModulePathModule
-                                      acceptChannel: acceptChannel
-                                      acceptOnPointerLeave: true
-                                    )
                                    (LabelSpec
                                       label: 'Path:'
                                       name: 'cvsRootLabel'
@@ -361,8 +362,6 @@
          
         )
       )
-
-    "Modified: / 11-01-2012 / 15:39:37 / cg"
 ! !
 
 !FileBasedSourceCodeManagementSettingsAppl class methodsFor:'others'!
@@ -675,9 +674,9 @@
 !FileBasedSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.11 2012-03-02 13:51:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.12 2012-03-12 11:09:21 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.11 2012-03-02 13:51:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBasedSourceCodeManagementSettingsAppl.st,v 1.12 2012-03-12 11:09:21 cg Exp $'
 ! !