diff -r 0b473c367b96 -r b09146c7ad7e MercurialSourceCodeManagementSettingsAppl.st --- a/MercurialSourceCodeManagementSettingsAppl.st Tue Jan 17 16:33:02 2012 +0100 +++ b/MercurialSourceCodeManagementSettingsAppl.st Tue Jan 17 17:43:15 2012 +0100 @@ -67,7 +67,7 @@ the UIHelpTool may not be able to read the specification." " - UIHelpTool openOnClass:CVSSourceCodeManagementSettingsAppl + UIHelpTool openOnClass:MercurialSourceCodeManagementSettingsAppl " @@ -119,6 +119,33 @@ #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' +#hgCheckAccess +'Perform a "hg status" command in the default repository to see if the repository is accessable' + +#hgCheckAccessPerModuleRoot +'Perform a "hg status" command in this module''s repository to see if the repository is accessable' + +#hgCommand +'The command to use for mercurial operations\(the path to "hg"/"hg.exe"-command. Not needed, if already in the shell''s PATH value)' + +#hgCommandTimeout +'The command timeout.\For slow connections (ssl-tunnel), it may make sense to increase this value.' + +#hgInit +'Perform a "hg init" command to setup the repository for the very first time' + +#hgRootDefault +'The default mercurial repository.\This will be used for all modules which are not listed below.' + +#hgRootPerModule +'The mercurial repository for which this specific module is defined' + +#hgRootPerModuleModule +'The module for which a specific mercurial repository is defined' + +#hgRootPerModuleRoot +'The mercurial repository for which this specific module is defined' + #loginPerModuleRoot 'Execute a "cvs login" operation for this CVSROOT' @@ -151,7 +178,7 @@ ) - "Modified: / 14-01-2012 / 20:23:37 / cg" + "Modified: / 17-01-2012 / 17:33:09 / cg" ! ! !MercurialSourceCodeManagementSettingsAppl class methodsFor:'image specs'! @@ -315,7 +342,7 @@ label: 'HG Command or Path:' name: 'Label1' layout: (LayoutFrame 0 0.0 0 0 60 0.25 22 0) - activeHelpKey: cvsCommand + activeHelpKey: hgCommand level: 0 translateLabel: true adjust: right @@ -323,7 +350,7 @@ (InputFieldSpec name: 'HGExecutableField' layout: (LayoutFrame 64 0.25 0 0 0 1 22 0) - activeHelpKey: cvsCommand + activeHelpKey: hgCommand tabable: true model: hgExecutableHolder acceptChannel: acceptChannel @@ -343,7 +370,7 @@ label: 'HG Command Timeout:' name: 'Label2' layout: (LayoutFrame 0 0.0 0 0 60 0.25 22 0) - activeHelpKey: cvsCommandTimeout + activeHelpKey: hgCommandTimeout level: 0 translateLabel: true adjust: right @@ -351,7 +378,7 @@ (InputFieldSpec name: 'EntryField1' layout: (LayoutFrame 64 0.25 0 0 120 0.25 22 0) - activeHelpKey: cvsCommandTimeout + activeHelpKey: hgCommandTimeout tabable: true model: hgCommandTimeoutHolder type: integerInRange @@ -374,7 +401,7 @@ label: 'Default Repository:' name: 'defaultCvsRootLabel' layout: (LayoutFrame 0 0.0 2 0 60 0.25 24 0) - activeHelpKey: cvsRootDefault + activeHelpKey: hgRootDefault level: 0 translateLabel: true adjust: right @@ -382,7 +409,7 @@ (ComboBoxSpec name: 'RepositoryComboBox' layout: (LayoutFrame 64 0.25 2 0 0 1 24 0) - activeHelpKey: cvsRootDefault + activeHelpKey: hgRootDefault tabable: true model: repositoryHolder immediateAccept: true @@ -402,7 +429,7 @@ label: 'Init' name: 'Button2' layout: (LayoutFrame -201 1 122 0 -101 1 144 0) - activeHelpKey: cvsLogin + activeHelpKey: hgInit translateLabel: true tabable: true model: initializeRepository @@ -412,7 +439,7 @@ label: 'Check Access' name: 'Button1' layout: (LayoutFrame -100 1 122 0 0 1 144 0) - activeHelpKey: cvsLogin + activeHelpKey: hgCheckAccess translateLabel: true tabable: true model: checkAccess @@ -422,14 +449,14 @@ label: 'Repository per Module:' name: 'knownModulesLabel' layout: (LayoutFrame 0 0.0 150 0 60 0.25 172 0) - activeHelpKey: cvsRootPerModule + activeHelpKey: hgRootPerModule translateLabel: true adjust: right ) (SequenceViewSpec name: 'List1' layout: (LayoutFrame 64 0.25 150 0 0 1 269 0) - activeHelpKey: cvsRootPerModule + activeHelpKey: hgRootPerModule tabable: true model: selectedPerModuleRepository hasHorizontalScrollBar: true @@ -442,14 +469,14 @@ label: 'Module:' name: 'moduleLabel' layout: (LayoutFrame 0 0.0 279 0 60 0.25 296 0) - activeHelpKey: cvsRootPerModuleModule + activeHelpKey: hgRootPerModuleModule translateLabel: true adjust: right ) (InputFieldSpec name: 'perModuleRepositoryModuleEntryField' layout: (LayoutFrame 64 0.25 275 0 0 1 297 0) - activeHelpKey: cvsRootPerModuleModule + activeHelpKey: hgRootPerModuleModule tabable: true model: perModuleRepositoryModule acceptChannel: acceptChannel @@ -459,14 +486,14 @@ label: 'Mercurial Repository:' name: 'hgRepository' layout: (LayoutFrame 0 0.0 304 0 60 0.25 321 0) - activeHelpKey: cvsRootPerModuleRoot + activeHelpKey: hgRootPerModuleRoot translateLabel: true adjust: right ) (ComboBoxSpec name: 'perModuleRepositoryComboBox' layout: (LayoutFrame 64 0.25 300 0 0 1.0 322 0) - activeHelpKey: cvsRootPerModuleRoot + activeHelpKey: hgRootPerModuleRoot tabable: true model: perModuleRoot immediateAccept: true @@ -514,7 +541,7 @@ (ActionButtonSpec label: 'Init' name: 'Button3' - activeHelpKey: cvsLogin + activeHelpKey: hgLoginPerModuleRoot translateLabel: true tabable: true model: initializePerModuleRepository @@ -524,7 +551,7 @@ (ActionButtonSpec label: 'Check Access' name: 'checkButton2' - activeHelpKey: loginPerModuleRoot + activeHelpKey: hgCheckAccessPerModuleRoot translateLabel: true tabable: true model: checkAccessPerModuleRepository @@ -780,6 +807,18 @@ "Modified: / 10-01-2012 / 00:18:15 / cg" "Created: / 14-01-2012 / 20:01:47 / cg" +! + +checkAccess + self halt:'unimplemented feature' + + "Created: / 17-01-2012 / 17:34:53 / cg" +! + +initializeRepository + self halt:'unimplemented feature' + + "Created: / 17-01-2012 / 17:42:27 / cg" ! ! !MercurialSourceCodeManagementSettingsAppl methodsFor:'aspects'! @@ -1038,7 +1077,7 @@ super initialize. - "Modified: / 14-01-2012 / 23:56:57 / cg" + "Modified: / 17-01-2012 / 17:39:13 / cg" ! ! !MercurialSourceCodeManagementSettingsAppl methodsFor:'queries'! @@ -1082,9 +1121,9 @@ !MercurialSourceCodeManagementSettingsAppl class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.3 2012-01-15 01:45:02 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-17 16:43:15 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.3 2012-01-15 01:45:02 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/MercurialSourceCodeManagementSettingsAppl.st,v 1.4 2012-01-17 16:43:15 cg Exp $' ! !