Tools__NewSystemBrowser.st
changeset 11027 e583b98cea3a
parent 11026 df51d6cfa980
child 11040 30836836f9ef
--- a/Tools__NewSystemBrowser.st	Fri Dec 23 19:39:08 2011 +0100
+++ b/Tools__NewSystemBrowser.st	Sun Dec 25 10:40:05 2011 +0100
@@ -13200,6 +13200,154 @@
     "Created: / 19-04-2011 / 15:24:05 / cg"
 !
 
+classDataBaseRepositoryMenu
+    "This resource specification was automatically generated
+     by the MenuEditor of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the MenuEditor may not be able to read the specification."
+
+
+    "
+     MenuEditor new openOnClass:Tools::NewSystemBrowser andSelector:#classDataBaseRepositoryMenu
+     (Menu new fromLiteralArrayEncoding:(Tools::NewSystemBrowser classDataBaseRepositoryMenu)) startUp
+    "
+
+    <resource: #menu>
+
+    ^ 
+     #(Menu
+        (
+         (MenuItem
+            enabled: hasClassSelectedHolderAndSourceCodeManagerHolder
+            label: 'CheckIn...'
+            itemValue: classMenuCheckInUsingManagerNamed:
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryCheckIn 'CheckIn...')
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasClassWithExtensionsSelectedHolder
+            label: 'CheckIn Extensions For'
+            translateLabel: true
+            submenuChannel: browseClassExtensionsMenuUsingManagerNamed:
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: changeSetContainsChangedClassesAndSourceCodeManagerHolder
+            label: 'CheckIn All Changed Classes'
+            itemValue: classMenuCheckInAllChangedClassesUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasProjectDefinitionSelectedAndSourceCodeManagerHolder
+            label: 'CheckIn Build Support Files...'
+            itemValue: classMenuCheckInBuildSupportFilesUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: hasNonPrivateClassSelectedAndSourceCodeManagerHolder
+            label: 'CheckOut Newest'
+            itemValue: classMenuCheckOutNewestUsingManagerNamed:
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryCheckOut 'CheckOut Newest')
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasNonPrivateClassSelectedAndSourceCodeManagerHolder
+            label: 'CheckOut Previous Version...'
+            itemValue: classMenuCheckOutUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: hasNonPrivateClassSelectedAndSourceCodeManagerHolder
+            label: 'Revision Log (Recent Changes)'
+            itemValue: classMenuShortRevisionLogUsingManagerNamed:
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryLog 'Revision Log (Recent Changes)')
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasNonPrivateClassSelectedAndSourceCodeManagerHolder
+            label: 'Revision Log (Full)'
+            itemValue: classMenuRevisionLogUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: hasClassSelectedAndSourceCodeManagerHolder
+            label: 'Compare with Newest in Repository...'
+            itemValue: classMenuCompareAgainstNewestInRepositoryUsingManagerNamed:
+            translateLabel: true
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryVersions 'Compare with Newest in Repository...')
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasSingleClassSelectedAndSourceCodeManagerHolder
+            label: 'Compare with Original in Repository...'
+            itemValue: classMenuCompareAgainstOriginalInRepositoryUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasSingleClassSelectedAndSourceCodeManagerHolder
+            label: 'Compare with Repository...'
+            itemValue: classMenuCompareWithRepositoryUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasSingleClassSelectedAndSourceCodeManagerHolder
+            label: 'Compare two Repository Versions...'
+            itemValue: classMenuCompareTwoRepositoryVersionsUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasProjectDefinitionOrClassWithExtensionsSelectedAndSourceCodeManagerHolder
+            label: 'Compare Extensions with Repository...'
+            itemValue: classMenuCompareExtensionsWithRepositoryUsingManagerNamed:
+            translateLabel: true
+            argument: DataBaseSourceCodeManager
+            showBusyCursorWhilePerforming: true
+          )
+         (MenuItem
+            enabled: hasProjectDefinitionSelectedAndSourceCodeManagerHolder
+            label: 'Compare Build Support File'
+            translateLabel: true
+            submenuChannel: compareBuildSupportFileMenuUsingManagerNamed:
+            argument: DataBaseSourceCodeManager
+          )
+         )
+        nil
+        nil
+      )
+!
+
 classFileBasedRepositoryMenu
     "This resource specification was automatically generated
      by the MenuEditor of ST/X."
@@ -13673,12 +13821,20 @@
             submenuChannel: classFileBasedRepositoryMenu
             labelImage: (ResourceRetriever ToolbarIconLibrary repositoryIcon 'File Repository')
           )
-         )
-        nil
-        nil
-      )
-
-    "Modified: / 21-12-2011 / 17:09:57 / cg"
+         (MenuItem
+            enabled: hasClassesSelectedAndDataBaseRepositoryExistsHolder
+            label: 'Database Repository'
+            translateLabel: true
+            isVisible: hasDataBaseSourceCodeManagerSupport
+            submenuChannel: classDataBaseRepositoryMenu
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryIcon 'Database Repository')
+          )
+         )
+        nil
+        nil
+      )
+
+    "Modified: / 22-12-2011 / 17:42:11 / cg"
 !
 
 classMenuSCMSliceAll
@@ -13871,12 +14027,20 @@
             submenuChannel: classFileBasedRepositoryMenu
             labelImage: (ResourceRetriever ToolbarIconLibrary repositoryIcon 'File Repository')
           )
-         )
-        nil
-        nil
-      )
-
-    "Modified: / 21-12-2011 / 17:12:38 / cg"
+         (MenuItem
+            enabled: hasClassesSelectedAndDataBaseRepositoryExistsHolder
+            label: 'Database Repository'
+            translateLabel: true
+            isVisible: hasDataBaseSourceCodeManagerSupport
+            submenuChannel: classDataBaseRepositoryMenu
+            labelImage: (ResourceRetriever ToolbarIconLibrary repositoryIcon 'Database Repository')
+          )
+         )
+        nil
+        nil
+      )
+
+    "Modified: / 22-12-2011 / 17:41:59 / cg"
 !
 
 classSCMMenu
@@ -15360,7 +15524,6 @@
     "Modified: / 29-09-2006 / 16:11:08 / cg"
 ! !
 
-
 !NewSystemBrowser class methodsFor:'menu specs-popup'!
 
 categoryPopUpMenu
@@ -34108,7 +34271,6 @@
     ^ brwsr
 ! !
 
-
 !NewSystemBrowser methodsFor:'menu actions-namespace'!
 
 nameSpaceMenuCheckOut
@@ -54713,11 +54875,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1679 2011-12-23 18:39:08 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1680 2011-12-25 09:40:05 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1679 2011-12-23 18:39:08 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1680 2011-12-25 09:40:05 cg Exp $'
 !
 
 version_SVN