--- a/MercurialSourceCodeManagementSettingsAppl.st Thu Jan 19 16:44:18 2012 +0100
+++ b/MercurialSourceCodeManagementSettingsAppl.st Fri Jan 20 13:51:22 2012 +0100
@@ -119,6 +119,9 @@
#flushSourceCache
'Remove all files from the source cache.\Access to source code will temporarily be slowed down,\until sources have been refetched from the repository'
+#hgAddPushURL
+'Add a repository to the push-URL list. A repository-push operation will synchronize your changes with this repository as well'
+
#hgCheckAccess
'Perform a "hg status" command in the default repository to see if the repository is accessable'
@@ -134,6 +137,12 @@
#hgInit
'Perform a "hg init" command to setup the repository for the very first time'
+#hgPushURLs
+'The push-URL list. A repository-push operation will send your changes to these repositories as well'
+
+#hgRemovePushURL
+'Remove the selected repository from the push-URL list. A repository-push operation will no longer synchronize your changes with this repository'
+
#hgRootDefault
'The default mercurial repository.\This will be used for all modules which are not listed below.'
@@ -178,7 +187,7 @@
)
- "Modified: / 17-01-2012 / 17:33:09 / cg"
+ "Modified: / 20-01-2012 / 13:50:42 / cg"
! !
!MercurialSourceCodeManagementSettingsAppl class methodsFor:'image specs'!
@@ -295,7 +304,7 @@
label: 'Mercurial Settings'
name: 'Mercurial Settings'
min: (Point 10 10)
- bounds: (Rectangle 0 0 800 497)
+ bounds: (Rectangle 0 0 811 693)
)
component:
(SpecCollection
@@ -569,7 +578,108 @@
)
)
- extent: (Point 800 389)
+ extent: (Point 811 389)
+ )
+ (FramedBoxSpec
+ label: 'Push URLs'
+ name: 'FramedBox2'
+ labelPosition: topLeft
+ translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'URL to Push To:'
+ name: 'Label6'
+ layout: (LayoutFrame 0 0.0 14 0 60 0.25 36 0)
+ activeHelpKey: hgPushURLs
+ translateLabel: true
+ adjust: right
+ )
+ (SequenceViewSpec
+ name: 'List2'
+ layout: (LayoutFrame 64 0.25 14 0 0 1 90 0)
+ activeHelpKey: hgPushURLs
+ tabable: true
+ model: selectedPushURL
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ useIndex: false
+ sequenceList: listOfPushURLs
+ )
+ (LabelSpec
+ label: 'URL:'
+ name: 'Label8'
+ layout: (LayoutFrame 0 0.0 101 0 60 0.25 118 0)
+ activeHelpKey: hgAddPushURL
+ translateLabel: true
+ adjust: right
+ )
+ (ComboBoxSpec
+ name: 'ComboBox2'
+ layout: (LayoutFrame 64 0.25 97 0 0 1.0 119 0)
+ activeHelpKey: hgAddPushURL
+ tabable: true
+ model: pushURL
+ immediateAccept: true
+ acceptOnLeave: true
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ acceptOnPointerLeave: true
+ comboList: hgPushURLPrototypeList
+ )
+ (HorizontalPanelViewSpec
+ name: 'HorizontalPanel3'
+ layout: (LayoutFrame 64 0.25 125 0 -1 1 150 0)
+ horizontalLayout: right
+ verticalLayout: center
+ horizontalSpace: 3
+ verticalSpace: 3
+ component:
+ (SpecCollection
+ collection: (
+ (ActionButtonSpec
+ label: 'Add/Apply'
+ name: 'Button6'
+ activeHelpKey: hgAddPushURL
+ translateLabel: true
+ tabable: true
+ model: addPushURL
+ extent: (Point 100 22)
+ )
+ (ActionButtonSpec
+ label: 'Remove'
+ name: 'Button7'
+ activeHelpKey: hgRemovePushURL
+ translateLabel: true
+ tabable: true
+ model: removePushURL
+ enableChannel: removeEnabled
+ extent: (Point 100 22)
+ )
+ (ViewSpec
+ name: 'Box17'
+ extent: (Point 100 10)
+ )
+ (ViewSpec
+ name: 'Box18'
+ extent: (Point 100 10)
+ )
+ (ViewSpec
+ name: 'Box19'
+ extent: (Point 99 9)
+ )
+ )
+
+ )
+ )
+ )
+
+ )
+ extent: (Point 811 187)
)
(FramedBoxSpec
label: 'Source Cache'
@@ -623,7 +733,7 @@
translateLabel: true
tabable: true
model: flushSourceCache
- extent: (Point 261 22)
+ extent: (Point 265 22)
)
(ActionButtonSpec
label: 'Condense Cache now'
@@ -631,7 +741,7 @@
translateLabel: true
tabable: true
model: condenseSourceCache
- extent: (Point 261 22)
+ extent: (Point 265 22)
)
)
@@ -640,7 +750,7 @@
)
)
- extent: (Point 800 95)
+ extent: (Point 811 95)
)
)
@@ -1121,9 +1231,9 @@
!MercurialSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-17 16:43:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.5 2012-01-20 12:51:22 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-17 16:43:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.5 2012-01-20 12:51:22 cg Exp $'
! !