Do not provide generic menu for Monticello SCM. jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Fri, 31 May 2013 00:47:36 +0100
branchjv
changeset 12808 1b7c88d91de8
parent 12807 ba8c5416aa28
child 12818 204da2f7db8e
Do not provide generic menu for Monticello SCM. For now, only show 'Commit'
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Fri May 31 00:35:44 2013 +0100
+++ b/Tools__NewSystemBrowser.st	Fri May 31 00:47:36 2013 +0100
@@ -16011,13 +16011,12 @@
 
     <resource: #menu>
 
-    ^
+    ^ 
      #(Menu
         (
          (MenuItem
             enabled: hasProjectSelectedAndSourceCodeManagerHolder
             label: 'CVS'
-            translateLabel: true
             submenuChannel: projectMenuSCMFor:
             labelImage: (ResourceRetriever ToolbarIconLibrary repositoryCVSIcon 'CVS')
             argument: CVSSourceCodeManager
@@ -16026,7 +16025,6 @@
          (MenuItem
             enabled: hasProjectSelectedAndSourceCodeManagerHolder
             label: 'SubVersion'
-            translateLabel: true
             isVisible: hasSubversionSupport
             submenuChannel: projectMenuSCMFor:
             labelImage: (ResourceRetriever ToolbarIconLibrary repositorySVNIcon 'SubVersion')
@@ -16034,24 +16032,23 @@
           )
          (MenuItem
             enabled: hasProjectSelectedAndSourceCodeManagerHolder
-	    label: 'Mercurial+'
-	    isVisible: hgRepositoryMenusAreShown
-	    submenuChannel: projectMenuSCMFor:
-	    labelImage: (ResourceRetriever ToolbarIconLibrary repositoryP4Icon 'Mercurial+')
-	    argument: HGSourceCodeManager
-	  )
-	 (MenuItem
-	    enabled: hasProjectSelectedAndSourceCodeManagerHolder
-	    label: 'Git+'
-	    isVisible: git2RepositoryMenusAreShown
-	    submenuChannel: projectMenuSCMFor:
-	    labelImage: (ResourceRetriever ToolbarIconLibrary repositoryP4Icon 'Git+')
-	    argument: GitSourceCodeManager2
-	  )
-	 (MenuItem
-	    enabled: hasProjectSelectedAndSourceCodeManagerHolder
+            label: 'Mercurial+'
+            isVisible: hgRepositoryMenusAreShown
+            submenuChannel: projectMenuSCMFor:
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryP4Icon 'Mercurial+')
+            argument: HGSourceCodeManager
+          )
+         (MenuItem
+            enabled: hasProjectSelectedAndSourceCodeManagerHolder
+            label: 'Git+'
+            isVisible: git2RepositoryMenusAreShown
+            submenuChannel: projectMenuSCMFor:
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryP4Icon 'Git+')
+            argument: GitSourceCodeManager2
+          )
+         (MenuItem
+            enabled: hasProjectSelectedAndSourceCodeManagerHolder
             label: 'Perforce'
-            translateLabel: true
             isVisible: hasPerforceSupport
             submenuChannel: projectMenuSCMFor:
             labelImage: (ResourceRetriever ToolbarIconLibrary repositoryP4Icon 'Perforce')
@@ -16060,11 +16057,9 @@
          (MenuItem
             enabled: hasProjectSelectedAndSourceCodeManagerHolder
             label: 'Monticello'
-            translateLabel: true
             isVisible: hasMonticelloSupport
-            submenuChannel: projectMenuSCMFor:
+            submenuChannel: projectMonticelloMenu
             labelImage: (ResourceRetriever ToolbarIconLibrary repositoryMCIcon 'Monticello')
-            argument: MCSourceCodeManager
           )
          )
         nil