AbstractFileBrowser.st
changeset 11149 d56b2ae72ef4
parent 11147 ce417478b309
child 11156 11c0b4cbc836
--- a/AbstractFileBrowser.st	Wed Jan 18 11:04:59 2012 +0100
+++ b/AbstractFileBrowser.st	Wed Jan 18 11:37:32 2012 +0100
@@ -2550,6 +2550,7 @@
     "Do not manually edit this!! If it is corrupted,
      the MenuEditor may not be able to read the specification."
 
+
     "
      MenuEditor new openOnClass:AbstractFileBrowser andSelector:#cvsMenu
      (Menu new fromLiteralArrayEncoding:(AbstractFileBrowser cvsMenu)) startUp
@@ -2558,80 +2559,78 @@
     <resource: #menu>
 
     ^ 
-     #(#Menu
-        #(
-         #(#MenuItem
-            #label: 'Commit (CVS)...'
-            #itemValue: #cvsCommit
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #enabled: #canCvsAddAndCommit
-            #label: 'Add && Commit...'
-            #itemValue: #cvsAddAndCommit
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #enabled: #canCvsAddAndCommit
-            #label: 'Add as Binary && Commit...'
-            #itemValue: #cvsAddBinaryAndCommit
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #label: '-'
-          )
-         #(#MenuItem
-            #enabled: #hasSelection
-            #label: 'Tag...'
-            #itemValue: #cvsTagSelection
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #enabled: #hasSelection
-            #label: 'Revision Log'
-            #itemValue: #cvsRevisionLog
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #enabled: #hasSelection
-            #label: 'Compare with newest in Repository'
-            #itemValue: #cvsCompareWithNewest
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #label: '-'
-          )
-         #(#MenuItem
-            #enabled: #hasSelection
-            #label: 'Update selected Files/Directories'
-            #itemValue: #cvsUpdateSelection
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #label: 'Update Directory Local'
-            #itemValue: #cvsUpdateAll
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #label: 'Update Directory Recursive'
-            #itemValue: #cvsUpdateAllRecursive
-            #translateLabel: true
-          )
-         #(#MenuItem
-            #label: '-'
-          )
-         #(#MenuItem
-            #enabled: #canRemoveCVSContainer
-            #label: 'Remove File && CVS Container...'
-            #itemValue: #cvsRemoveFileAndCVSContainer
-            #translateLabel: true
+     #(Menu
+        (
+         (MenuItem
+            label: 'Commit (CVS)...'
+            itemValue: cvsCommit
+            translateLabel: true
+          )
+         (MenuItem
+            enabled: canCvsAddAndCommit
+            label: 'Add && Commit...'
+            itemValue: cvsAddAndCommit
+            translateLabel: true
+          )
+         (MenuItem
+            enabled: canCvsAddAndCommit
+            label: 'Add as Binary && Commit...'
+            itemValue: cvsAddBinaryAndCommit
+            translateLabel: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: hasSelection
+            label: 'Update selected Files/Directories'
+            itemValue: cvsUpdateSelection
+            translateLabel: true
+          )
+         (MenuItem
+            label: 'Update Directory Local'
+            itemValue: cvsUpdateAll
+            translateLabel: true
+          )
+         (MenuItem
+            label: 'Update Directory Recursive'
+            itemValue: cvsUpdateAllRecursive
+            translateLabel: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: hasSelection
+            label: 'Tag...'
+            itemValue: cvsTagSelection
+            translateLabel: true
+          )
+         (MenuItem
+            enabled: hasSelection
+            label: 'Revision Log'
+            itemValue: cvsRevisionLog
+            translateLabel: true
+          )
+         (MenuItem
+            enabled: hasSelection
+            label: 'Compare with newest in Repository'
+            itemValue: cvsCompareWithNewest
+            translateLabel: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            enabled: canRemoveCVSContainer
+            label: 'Remove File && CVS Container...'
+            itemValue: cvsRemoveFileAndCVSContainer
+            translateLabel: true
           )
          )
         nil
         nil
       )
-
-    "Modified: / 08-08-2011 / 19:30:45 / cg"
 !
 
 mercurialMenu
@@ -9018,9 +9017,9 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.485 2012-01-18 10:03:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.486 2012-01-18 10:37:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.485 2012-01-18 10:03:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.486 2012-01-18 10:37:32 cg Exp $'
 ! !