diff --git a/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/menuCommandOn..st b/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/controlPanelMenuCommandOn..st similarity index 68% rename from repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/menuCommandOn..st rename to repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/controlPanelMenuCommandOn..st index 7ca6d9052..ceaff0471 100644 --- a/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/menuCommandOn..st +++ b/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/controlPanelMenuCommandOn..st @@ -1,10 +1,10 @@ world menu -menuCommandOn: aBuilder +controlPanelMenuCommandOn: aBuilder - self registerIcons. + (aBuilder item: #ServerAdapterBrowser) - order: 0.21; - parent: #Tools; + order: 1; + parent: #Seaside; label: 'Seaside Control Panel'; icon: (self iconNamed: #adaptorRunningIcon); action: [ self open ] \ No newline at end of file diff --git a/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/seasideMenuCommandOn..st b/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/seasideMenuCommandOn..st new file mode 100644 index 000000000..c100e420c --- /dev/null +++ b/repository/Seaside-Pharo100-Tools-Spec2.package/WAPharoControlPanel.class/class/seasideMenuCommandOn..st @@ -0,0 +1,7 @@ +world menu +seasideMenuCommandOn: builder + + + (builder item: #Seaside) + target: self; + order: 1.4 \ No newline at end of file