Tools__NewSystemBrowser.st
changeset 11333 90b33867249c
parent 11313 a184e3f555d4
child 11374 2f7f075c4263
--- a/Tools__NewSystemBrowser.st	Fri Mar 02 14:51:23 2012 +0100
+++ b/Tools__NewSystemBrowser.st	Fri Mar 02 14:51:51 2012 +0100
@@ -11595,6 +11595,7 @@
     "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:#variablesMenu
      (Menu new fromLiteralArrayEncoding:(Tools::NewSystemBrowser variablesMenu)) startUp
@@ -11680,14 +11681,14 @@
                (MenuItem
                   enabled: hasInstanceVariableSelectedInCodeViewOrVariableListAndCanUseRefactoringSupportHolder
                   label: 'Pull Up'
-                  itemValue: codeMenuPullUpInstanceVariable
+                  itemValue: variablesMenuPullUp
                   translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasInstanceVariableSelectedInCodeViewOrVariableListAndCanUseRefactoringSupportHolder
                   label: 'Push Down'
-                  itemValue: codeMenuPushDownInstanceVariable
+                  itemValue: variablesMenuPushDown
                   translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
@@ -11835,14 +11836,14 @@
                (MenuItem
                   enabled: hasClassVariableSelectedInCodeViewOrVariableListAndCanUseRefactoringSupportHolder
                   label: 'Pull Up'
-                  itemValue: codeMenuPullUpClassVariable
+                  itemValue: variablesMenuPullUp
                   translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
                (MenuItem
                   enabled: hasClassVariableSelectedInCodeViewOrVariableListAndCanUseRefactoringSupportHolder
                   label: 'Push Down'
-                  itemValue: codeMenuPushDownClassVariable
+                  itemValue: variablesMenuPushDown
                   translateLabel: true
                   showBusyCursorWhilePerforming: true
                 )
@@ -34579,11 +34580,13 @@
         cls := mthd mclass.
     ] ifFalse:[
         self codeAspect value ~= #classDefinition ifTrue:[
-            ^ self warn:'Select either a class or a method.'
+            ^ self warn:'Select either a single class or a single method.'
         ].
         cls := self theSingleSelectedClass.
     ].
     aOneArgBlock value:cls.
+
+    "Modified: / 02-03-2012 / 14:32:58 / cg"
 !
 
 withCurrentMethodsClassAndSelectorDo:aTwoArgBlock
@@ -56105,11 +56108,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1724 2012-03-01 19:21:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1725 2012-03-02 13:51:51 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1724 2012-03-01 19:21:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1725 2012-03-02 13:51:51 cg Exp $'
 !
 
 version_SVN