Tools__NewSystemBrowser.st
changeset 11926 2e494cc55d4d
parent 11923 69b30ba3d663
child 11929 d23d34956a9f
--- a/Tools__NewSystemBrowser.st	Tue Oct 23 21:01:57 2012 +0200
+++ b/Tools__NewSystemBrowser.st	Wed Oct 24 12:08:06 2012 +0200
@@ -7565,7 +7565,6 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'FileOut'
-            translateLabel: true
             submenu: 
            (Menu
               (
@@ -7573,7 +7572,6 @@
                   enabled: hasClassSelectedHolder
                   label: 'as...'
                   itemValue: classMenuFileOutAs
-                  translateLabel: true
                   isVisible: hasSingleClassSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7581,7 +7579,6 @@
                   enabled: hasClassSelectedAndCanFileOutXMLHolder
                   label: 'XML as...'
                   itemValue: classMenuFileOutXMLAs
-                  translateLabel: true
                   isVisible: hasSingleClassSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7589,7 +7586,6 @@
                   enabled: hasClassSelectedAndCanFileOutSIFHolder
                   label: 'SIF as...'
                   itemValue: classMenuFileOutSIFAs
-                  translateLabel: true
                   isVisible: hasSingleClassSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7597,7 +7593,6 @@
                   enabled: hasClassSelectedAndCanFileOutBinaryHolder
                   label: 'Binary as...'
                   itemValue: classMenuFileOutBinaryAs
-                  translateLabel: true
                   isVisible: hasSingleClassSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7605,7 +7600,6 @@
                   enabled: hasClassSelectedHolder
                   label: 'Each in...'
                   itemValue: classMenuFileOutEachIn
-                  translateLabel: true
                   isVisible: hasMultipleClassesSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7613,14 +7607,12 @@
                   enabled: hasProjectDefinitionSelectedHolder
                   label: 'Build Support Files in...'
                   itemValue: classMenuFileOutBuildSupportFiles
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasClassSelectedAndCanFileOutXMLHolder
                   label: 'Each XML in...'
                   itemValue: classMenuFileOutEachXMLIn
-                  translateLabel: true
                   isVisible: hasMultipleClassesSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7628,7 +7620,6 @@
                   enabled: hasClassSelectedAndCanFileOutSIFHolder
                   label: 'Each SIF in...'
                   itemValue: classMenuFileOutEachSIFIn
-                  translateLabel: true
                   isVisible: hasMultipleClassesSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7636,7 +7627,6 @@
                   enabled: hasClassSelectedHolder
                   label: 'Each Binary in...'
                   itemValue: classMenuFileOutEachBinaryIn
-                  translateLabel: true
                   isVisible: hasMultipleClassesSelectedHolder
                   showBusyCursorWhilePerforming: true
                 )
@@ -7647,14 +7637,12 @@
                   enabled: hasClassSelectedAndCanSendMailHolder
                   label: 'Mail To...'
                   itemValue: classMenuMailTo
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Copy Source to Clipboard'
                   itemValue: classMenuCopySourceToClipboard
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                )
@@ -7664,7 +7652,6 @@
           )
          (MenuItem
             label: 'Repository Slice'
-            translateLabel: true
             submenuChannel: classMenuSCMSlice
             isMenuSlice: true
           )
@@ -7674,7 +7661,6 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Documentation'
-            translateLabel: true
             submenu: 
            (Menu
               (
@@ -7682,14 +7668,12 @@
                   enabled: hasClassSelectedHolder
                   label: 'PrintOut'
                   itemValue: classMenuPrintOut
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'PrintOut Protocol'
                   itemValue: classMenuPrintOutProtocol
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
@@ -7699,14 +7683,12 @@
                   enabled: hasClassSelectedHolder
                   label: 'HTML Documentation'
                   itemValue: classMenuDocumentation
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Save HTML Documentation As...'
                   itemValue: classMenuSaveDocumentationAs
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
@@ -7715,17 +7697,14 @@
                (MenuItem
                   label: 'Show Comment'
                   itemValue: classMenuComment
-                  translateLabel: true
                 )
                (MenuItem
                   label: 'Show Hierarchy'
                   itemValue: classMenuHierarchy
-                  translateLabel: true
                 )
                (MenuItem
                   label: 'Show Definition'
                   itemValue: classMenuDefinition
-                  translateLabel: true
                 )
                (MenuItem
                   label: '-'
@@ -7734,7 +7713,6 @@
                   enabled: hasOOMPackageLoadedHolder
                   label: 'Metrics Report'
                   itemValue: classMenuMetrics
-                  translateLabel: true
                 )
                )
               nil
@@ -7747,7 +7725,6 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Spawn'
-            translateLabel: true
             submenu: 
            (Menu
               (
@@ -7755,51 +7732,42 @@
                   enabled: hasClassSelectedHolder
                   label: 'Buffer with Class(es)'
                   itemValue: classMenuSpawnClassesBuffer
-                  translateLabel: true
                   isVisible: isLintResultBrowserHolder
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Buffer with References to Class'
                   itemValue: classMenuSpawnBufferWithClassReferences
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Buffer with References to Class or Subclass'
                   itemValue: classMenuSpawnBufferWithClassOrSubclassReferences
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Buffer with Subclasses'
                   itemValue: classMenuSpawnBufferWithAllSubclasses
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Buffer with Superclasses'
                   itemValue: classMenuSpawnBufferWithAllSuperclasses
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasMultipleClassesSelectedHolder
                   label: 'Buffer with Common Superclass'
                   itemValue: classMenuSpawnBufferWithCommonSuperclass
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
-                  label: 'Buffer with Projects'
+                  label: 'Buffer with Project(s)'
                   itemValue: classMenuSpawnBufferWithClassProjects
-                  translateLabel: true
-                  isVisible: false
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Buffer'
                   itemValue: classMenuSpawnClassBuffer
-                  translateLabel: true
                   isVisible: false
                 )
                (MenuItem
@@ -7809,54 +7777,44 @@
                   enabled: hasClassSelectedHolder
                   label: 'Browser on Class(es)'
                   itemValue: classMenuSpawnClassesBuffer
-                  translateLabel: true
                   isVisible: isLintResultBrowserHolder
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Browser on References to Class'
                   itemValue: classMenuSpawnClassReferences
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Browser on References to Class or Subclass'
                   itemValue: classMenuSpawnClassOrSubclassReferences
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Browser on Subclasses'
                   itemValue: classMenuSpawnWithAllSubclasses
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Browser on Superclasses'
                   itemValue: classMenuSpawnWithAllSuperclasses
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasMultipleClassesSelectedHolder
                   label: 'Browser on Common Superclass'
                   itemValue: classMenuSpawnWithCommonSuperclass
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
-                  label: 'Browser on Projects'
+                  label: 'Browser on Project(s)'
                   itemValue: classMenuSpawnClassProjects
-                  translateLabel: true
-                  isVisible: false
                 )
                (MenuItem
                   enabled: hasClassSelectedHolder
                   label: 'Browser'
                   itemValue: classMenuSpawnClass
-                  translateLabel: true
                   isVisible: false
                 )
-
                )
               nil
               nil
@@ -7865,7 +7823,6 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Find'
-            translateLabel: true
             isVisible: false
             submenu: 
            (Menu
@@ -7874,7 +7831,6 @@
                   enabled: hasClassSelectedHolder
                   label: 'String...'
                   itemValue: classMenuFindString
-                  translateLabel: true
                 )
                )
               nil
@@ -7887,21 +7843,18 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Instance Variables'
-            translateLabel: true
             isVisible: hasNonMetaSelectedHolder
             submenuChannel: classInstanceVariablesMenu
           )
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Class Instance Variables'
-            translateLabel: true
             isVisible: hasMetaSelectedHolder
             submenuChannel: classInstanceVariablesMenu
           )
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Class Variables'
-            translateLabel: true
             submenuChannel: classClassVariablesMenu
           )
          (MenuItem
@@ -7909,13 +7862,11 @@
           )
          (MenuItem
             label: 'New'
-            translateLabel: true
             submenu: 
            (Menu
               (
                (MenuItem
                   label: 'classNewSlice'
-                  translateLabel: true
                   submenuChannel: classNewSlice
                   isMenuSlice: true
                 )
@@ -7928,12 +7879,10 @@
             enabled: hasSingleClassSelectedHolder
             label: 'Copy...'
             itemValue: classMenuCopyAs
-            translateLabel: true
           )
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Move'
-            translateLabel: true
             submenu: 
            (Menu
               (
@@ -7941,19 +7890,16 @@
                   enabled: hasNonPrivateClassSelected
                   label: 'To Category...'
                   itemValue: classMenuMoveToCategory
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasNonPrivateClassSelected
                   label: 'To Namespace...'
                   itemValue: classMenuMoveToNamespace
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: hasNonPrivateClassSelected
                   label: 'To Package...'
                   itemValue: classMenuMoveToProject
-                  translateLabel: true
                 )
                (MenuItem
                   label: '-'
@@ -7962,19 +7908,16 @@
                   enabled: hasClassSelectedHolder
                   label: 'Make Private in...'
                   itemValue: classMenuMakePrivateIn
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: canMakePublicClass
                   label: 'Make Public'
                   itemValue: classMenuMakePublic
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: canMakePublicClass
                   label: 'Make Public in...'
                   itemValue: classMenuMakePublicIn
-                  translateLabel: true
                 )
                (MenuItem
                   label: '-'
@@ -7984,14 +7927,12 @@
                   label: 'New Common Superclass with Children (Convert to Siblings)...'
                   itemValue: classMenuChildrenToSiblings
                   nameKey: convertToSibling
-                  translateLabel: true
                 )
                (MenuItem
                   enabled: canInsertSuperclassHolder
                   label: 'New Common Superclass (Insert Superclass)...'
                   itemValue: classMenuInsertNewSuperclass
                   nameKey: insertSuperclass
-                  translateLabel: true
                 )
                )
               nil
@@ -8002,7 +7943,6 @@
             enabled: hasSingleClassSelectedHolder
             label: 'Rename...'
             itemValue: classMenuRename
-            translateLabel: true
             shortcutKey: Rename
             ignoreShortcutKeys: true
           )
@@ -8010,13 +7950,11 @@
             enabled: hasClassSelectedHolder
             label: 'Safe Remove...'
             itemValue: classMenuSaveRemove
-            translateLabel: true
           )
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Remove...'
             itemValue: classMenuRemove
-            translateLabel: true
             shortcutKey: Delete
             labelImage: (ResourceRetriever ToolbarIconLibrary erase16x16Icon 'Remove...')
             ignoreShortcutKeys: true
@@ -8027,7 +7965,6 @@
          (MenuItem
             enabled: hasClassSelectedHolder
             label: 'Compare'
-            translateLabel: true
             submenu: 
            (Menu
               (
@@ -8035,28 +7972,24 @@
                   enabled: hasClassSelectedAndSourceCodeManagerHolder
                   label: 'With Newest in Repository...'
                   itemValue: classMenuCompareAgainstNewestInRepository
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasSingleClassSelectedAndSourceCodeManagerHolder
                   label: 'With Original in Repository...'
                   itemValue: classMenuCompareAgainstOriginalInRepository
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasSingleClassSelectedAndSourceCodeManagerHolder
                   label: 'With Repository...'
                   itemValue: classMenuCompareWithRepository
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasSingleClassSelected
                   label: 'With File...'
                   itemValue: classMenuCompareWithFile
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
@@ -8065,7 +7998,6 @@
                 )
                (MenuItem
                   label: 'With SmallTeam Version on Host'
-                  translateLabel: true
                   isVisible: smallTeamAvailable
                   submenuChannel: compareClassWithSmallTeamVersionMenu
                 )
@@ -8076,14 +8008,12 @@
                   enabled: hasSingleClassSelectedHolder
                   label: 'With Class...'
                   itemValue: classMenuCompareWithClass
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasExactlyTwoClassesSelectedHolder
                   label: 'With each other'
                   itemValue: classMenuCompareTwoSelectedClasses
-                  translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                )
@@ -8093,25 +8023,21 @@
           )
          (MenuItem
             label: 'Generate'
-            translateLabel: true
             submenuChannel: classGenerateMenu
             keepLinkedMenu: true
           )
          (MenuItem
             label: 'Static Analysis (Lint)'
-            translateLabel: true
             submenuChannel: classCheckMenu
             labelImage: (ResourceRetriever ToolbarIconLibrary lint16x16Icon 'Static Analysis (Lint)')
           )
          (MenuItem
             label: 'Debug'
-            translateLabel: true
             submenuChannel: classDebugMenu
             keepLinkedMenu: true
           )
          (MenuItem
             label: 'Special'
-            translateLabel: true
             submenuChannel: classSpecialMenu
             keepLinkedMenu: true
           )
@@ -8121,7 +8047,6 @@
          (MenuItem
             label: 'Search && Rewrite...'
             itemValue: classMenuRewrite
-            translateLabel: true
           )
          (MenuItem
             label: '-'
@@ -8130,15 +8055,12 @@
          (MenuItem
             label: 'Update'
             itemValue: classMenuUpdate
-            translateLabel: true
             isVisible: false
           )
          )
         nil
         nil
       )
-
-    "Modified: / 28-02-2012 / 08:57:35 / cg"
 !
 
 classNewHaskellClassSlice
@@ -40287,7 +40209,7 @@
         forSpec:spec
         setupWith:[:brwsr |
             "/ setup for a constant list ...
-self halt.
+
             brwsr projectListApp includedPseudoEntryForChanged:false.
 
             brwsr immediateUpdate value:true.
@@ -57674,11 +57596,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1800 2012-10-23 19:01:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1801 2012-10-24 10:08:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1800 2012-10-23 19:01:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1801 2012-10-24 10:08:06 cg Exp $'
 !
 
 version_SVN