CVSSourceCodeManagementSettingsAppl.st
branchjv
changeset 12308 5d9291c0fc27
parent 12287 400a99059170
child 12401 4714b9640528
--- a/CVSSourceCodeManagementSettingsAppl.st	Fri Nov 30 14:25:59 2012 +0000
+++ b/CVSSourceCodeManagementSettingsAppl.st	Fri Nov 30 17:23:39 2012 +0000
@@ -76,6 +76,9 @@
 #addPerModuleRoot
 'Add this per-module entry'
 
+#addPublicExeptRepository
+'Add an entry to access stx''s sources from the public exept repository'
+
 #addPerPackageManager
 'Add a new per-package manager definition'
 
@@ -246,7 +249,7 @@
           label: 'CVS Settings'
           name: 'CVS Settings'
           min: (Point 10 10)
-          bounds: (Rectangle 0 0 800 497)
+          bounds: (Rectangle 0 0 800 526)
         )
         component: 
        (SpecCollection
@@ -492,6 +495,30 @@
                                  
                                 )
                               )
+                             (HorizontalPanelViewSpec
+                                name: 'HorizontalPanel3'
+                                layout: (LayoutFrame 64 0.25 359 0 -1 1 384 0)
+                                horizontalLayout: right
+                                verticalLayout: center
+                                horizontalSpace: 3
+                                verticalSpace: 3
+                                component: 
+                               (SpecCollection
+                                  collection: (
+                                   (ActionButtonSpec
+                                      label: 'Add eXept''s Public Repository'
+                                      name: 'Button2'
+                                      activeHelpKey: addPublicExeptRepository
+                                      translateLabel: true
+                                      resizeForLabel: true
+                                      tabable: true
+                                      model: addPublicExeptRepository
+                                      extent: (Point 209 22)
+                                    )
+                                   )
+                                 
+                                )
+                              )
                              )
                            
                           )
@@ -499,7 +526,7 @@
                        )
                      
                     )
-                    extent: (Point 800 389)
+                    extent: (Point 800 415)
                   )
                  (FramedBoxSpec
                     label: 'Source Cache'
@@ -605,6 +632,10 @@
     "Created: / 08-11-2006 / 19:25:21 / cg"
 !
 
+addPublicExeptRepository
+    self addModule:'stx' withData:{ CVSSourceCodeManager . (CVSSourceCodeManager exeptsPublicSTXRepositoryModuleRoot) }.
+!
+
 basicReadSettings
     |infoPerModule|
 
@@ -1042,13 +1073,13 @@
 !CVSSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.25 2012/08/09 08:58:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.26 2012/10/15 18:46:00 cg Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.25 2012/08/09 08:58:40 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.26 2012/10/15 18:46:00 cg Exp §'
 !
 
 version_SVN
-    ^ '$Id: CVSSourceCodeManagementSettingsAppl.st 8048 2012-09-07 17:28:09Z vranyj1 $'
+    ^ '$Id: CVSSourceCodeManagementSettingsAppl.st 8074 2012-11-30 17:23:39Z vranyj1 $'
 ! !