AbstractSettingsApplication.st
changeset 16682 c338771ee657
parent 16673 72965741529d
child 16689 70b43a6c4755
child 16718 cc9f5b0ac2bd
--- a/AbstractSettingsApplication.st	Thu Jun 09 16:11:38 2016 +0200
+++ b/AbstractSettingsApplication.st	Thu Jun 09 16:11:54 2016 +0200
@@ -15537,10 +15537,10 @@
 
     <resource: #canvas>
 
-    ^
+    ^ 
     #(FullSpec
        name: windowSpec
-       window:
+       window: 
       (WindowSpec
          label: 'Source Code Manager Settings'
          name: 'Source Code Manager Settings'
@@ -15548,7 +15548,7 @@
          min: (Point 10 10)
          bounds: (Rectangle 0 0 660 639)
        )
-       component:
+       component: 
       (SpecCollection
          collection: (
           (VerticalPanelViewSpec
@@ -15558,7 +15558,7 @@
              verticalLayout: topSpace
              horizontalSpace: 3
              verticalSpace: 20
-             component:
+             component: 
             (SpecCollection
                collection: (
                 (VerticalPanelViewSpec
@@ -15567,12 +15567,12 @@
                    verticalLayout: top
                    horizontalSpace: 3
                    verticalSpace: 4
-                   component:
+                   component: 
                   (SpecCollection
                      collection: (
                       (ViewSpec
                          name: 'Box3'
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (CheckBoxSpec
@@ -15603,7 +15603,7 @@
                                adjust: right
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 30)
                        )
@@ -15613,7 +15613,7 @@
                          activeHelpKey: perPackageConfiguration
                          labelPosition: topLeft
                          translateLabel: true
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (VerticalPanelViewSpec
@@ -15624,13 +15624,13 @@
                                verticalLayout: bottomFit
                                horizontalSpace: 3
                                verticalSpace: 3
-                               component:
+                               component: 
                               (SpecCollection
                                  collection: (
                                   (ViewSpec
                                      name: 'RepositoryConfigurationListBox'
                                      activeHelpKey: perPackageConfiguration
-                                     component:
+                                     component: 
                                     (SpecCollection
                                        collection: (
                                         (DataSetSpec
@@ -15651,7 +15651,7 @@
                                            verticalLayout: top
                                            horizontalSpace: 5
                                            verticalSpace: 3
-                                           component:
+                                           component: 
                                           (SpecCollection
                                              collection: (
                                               (ActionButtonSpec
@@ -15660,7 +15660,7 @@
                                                  activeHelpKey: addPerPackageManager
                                                  translateLabel: true
                                                  model: actionAdd
-                                                 extent: (Point 121 30)
+                                                 extent: (Point 119 30)
                                                )
                                               (ActionButtonSpec
                                                  label: 'Edit...'
@@ -15669,7 +15669,7 @@
                                                  translateLabel: true
                                                  model: actionEdit
                                                  enableChannel: canRemoveManagerPerPackageEntry
-                                                 extent: (Point 121 30)
+                                                 extent: (Point 119 30)
                                                )
                                               (ActionButtonSpec
                                                  label: 'Move Up'
@@ -15678,7 +15678,7 @@
                                                  translateLabel: true
                                                  model: actionMoveUp
                                                  enableChannel: canMoveUp
-                                                 extent: (Point 121 30)
+                                                 extent: (Point 119 30)
                                                )
                                               (ActionButtonSpec
                                                  label: 'Move Down'
@@ -15687,7 +15687,7 @@
                                                  translateLabel: true
                                                  model: actionMoveDown
                                                  enableChannel: canMoveDown
-                                                 extent: (Point 121 30)
+                                                 extent: (Point 119 30)
                                                )
                                               (LabelSpec
                                                  name: 'SpacingLabel'
@@ -15701,10 +15701,10 @@
                                                  translateLabel: true
                                                  model: actionRemove
                                                  enableChannel: canRemoveManagerPerPackageEntry
-                                                 extent: (Point 121 30)
+                                                 extent: (Point 119 30)
                                                )
                                               )
-
+                                            
                                            )
                                          )
                                         (ActionButtonSpec
@@ -15716,16 +15716,16 @@
                                            model: actionTest
                                          )
                                         )
-
+                                      
                                      )
-                                     extent: (Point 626 266)
+                                     extent: (Point 618 258)
                                    )
                                   )
-
+                                
                                )
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 300)
                        )
@@ -15735,18 +15735,18 @@
                          activeHelpKey: sourceCache
                          labelPosition: topLeft
                          translateLabel: true
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (ViewSpec
                                name: 'SourceCacheDirBox'
                                layout: (LayoutFrame 0 0 0 0 0 1 30 0)
-                               component:
+                               component: 
                               (SpecCollection
                                  collection: (
                                   (FilenameInputFieldSpec
                                      name: 'FilenameEntryField1'
-                                     layout: (LayoutFrame 64 0.25 0 0 0 1 30 0)
+                                     layout: (LayoutFrame 64 0.25 0 0 -2 1 30 0)
                                      enableChannel: useManager
                                      model: sourceCacheDir
                                      immediateAccept: false
@@ -15763,17 +15763,17 @@
                                      adjust: right
                                    )
                                   )
-
+                                
                                )
                              )
                             (HorizontalPanelViewSpec
                                name: 'CacheActionsHorizontalPanel1'
-                               layout: (LayoutFrame 0 0 37 0 0 1 67 0)
+                               layout: (LayoutFrame 0 0 37 0 -1 1 67 0)
                                horizontalLayout: right
                                verticalLayout: center
                                horizontalSpace: 3
                                verticalSpace: 3
-                               component:
+                               component: 
                               (SpecCollection
                                  collection: (
                                   (ActionButtonSpec
@@ -15784,20 +15784,20 @@
                                      tabable: true
                                      model: fillSourceCache
                                      enableChannel: useManager
-                                     extent: (Point 171 30)
+                                     extent: (Point 150 30)
                                    )
                                   )
-
+                                
                                )
                              )
                             (HorizontalPanelViewSpec
                                name: 'CacheActionsHorizontalPanel2'
-                               layout: (LayoutFrame 0 0 70 0 0 1 100 0)
+                               layout: (LayoutFrame 0 0 70 0 -1 1 100 0)
                                horizontalLayout: right
                                verticalLayout: center
                                horizontalSpace: 3
                                verticalSpace: 3
-                               component:
+                               component: 
                               (SpecCollection
                                  collection: (
                                   (ActionButtonSpec
@@ -15822,7 +15822,7 @@
                                      tabable: true
                                      model: flushSourceCache
                                      enableChannel: useManager
-                                     extent: (Point 171 30)
+                                     extent: (Point 150 30)
                                    )
                                   (ActionButtonSpec
                                      label: 'Condense'
@@ -15832,20 +15832,20 @@
                                      tabable: true
                                      model: condenseSourceCache
                                      enableChannel: useManager
-                                     extent: (Point 171 30)
+                                     extent: (Point 150 30)
                                    )
                                   )
-
+                                
                                )
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 136)
                        )
                       (ViewSpec
                          name: 'UseLocalSourceBox'
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (CheckBoxSpec
@@ -15858,14 +15858,14 @@
                                translateLabel: true
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 30)
                        )
                       (ViewSpec
                          name: 'KeepMethodSourceBox'
                          activeHelpKey: keepMethodSourceInImage
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (CheckBoxSpec
@@ -15878,14 +15878,14 @@
                                translateLabel: true
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 30)
                        )
                       (ViewSpec
                          name: 'CheckForHaltSendsBox'
                          activeHelpKey: checkClassesWhenCheckingIn
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (CheckBoxSpec
@@ -15898,14 +15898,14 @@
                                translateLabel: true
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 30)
                        )
                       (ViewSpec
                          name: 'VerboseBox'
                          activeHelpKey: verboseSourceCodeAccess
-                         component:
+                         component: 
                         (SpecCollection
                            collection: (
                             (CheckBoxSpec
@@ -15918,21 +15918,21 @@
                                translateLabel: true
                              )
                             )
-
+                          
                          )
                          extent: (Point 660 30)
                        )
                       )
-
+                    
                    )
                    extent: (Point 660 768)
                  )
                 )
-
+              
              )
            )
           )
-
+        
        )
      )
 ! !