preps for \"showInBrowserMenus\"
authorClaus Gittinger <cg@exept.de>
Mon, 09 Jan 2012 23:59:17 +0100
changeset 11064 225d769b52b6
parent 11063 bae37a424fa8
child 11065 e57980bdbf2f
preps for \"showInBrowserMenus\"
DataBaseSourceCodeManagementSettingsAppl.st
--- a/DataBaseSourceCodeManagementSettingsAppl.st	Mon Jan 09 23:58:33 2012 +0100
+++ b/DataBaseSourceCodeManagementSettingsAppl.st	Mon Jan 09 23:59:17 2012 +0100
@@ -177,15 +177,22 @@
                              (FramedBoxSpec
                                 label: 'Database Source Repository Manager Settings'
                                 name: 'FileRepositorySetupBox'
-                                layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+                                layout: (LayoutFrame 0 0 0 0 0 1 -23 1)
                                 labelPosition: topLeft
                                 translateLabel: true
                                 component: 
                                (SpecCollection
                                   collection: (
+                                   (CheckBoxSpec
+                                      label: 'Show in Browser Menus'
+                                      name: 'CheckBox1'
+                                      layout: (LayoutFrame 0 0 5 0 0 1 27 0)
+                                      model: showInBrowserMenusHolder
+                                      translateLabel: true
+                                    )
                                    (ViewSpec
                                       name: 'Box1'
-                                      layout: (LayoutFrame 0 0 0 0 0 1 25 0)
+                                      layout: (LayoutFrame 0 0 43 0 0 1 68 0)
                                       activeHelpKey: defaultDBName
                                       component: 
                                      (SpecCollection
@@ -274,7 +281,7 @@
                                     )
                                    (HorizontalPanelViewSpec
                                       name: 'HorizontalPanel2'
-                                      layout: (LayoutFrame 64 0.25 -25 1 -1 1 0 1)
+                                      layout: (LayoutFrame 64 0.25 257 0 -1 1 282 0)
                                       horizontalLayout: fitSpace
                                       verticalLayout: center
                                       horizontalSpace: 3
@@ -314,7 +321,7 @@
                              )
                            
                           )
-                          extent: (Point 659 327)
+                          extent: (Point 659 347)
                         )
                        )
                      
@@ -706,9 +713,9 @@
 !DataBaseSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DataBaseSourceCodeManagementSettingsAppl.st,v 1.3 2011-12-26 01:51:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DataBaseSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-09 22:59:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DataBaseSourceCodeManagementSettingsAppl.st,v 1.3 2011-12-26 01:51:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DataBaseSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-09 22:59:17 cg Exp $'
 ! !