The Trunk: MonticelloConfigurations-fbs.108.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: MonticelloConfigurations-fbs.108.mcz

commits-2
Frank Shearar uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-fbs.108.mcz

==================== Summary ====================

Name: MonticelloConfigurations-fbs.108
Author: fbs
Time: 22 April 2013, 8:32:49.06 pm
UUID: 6407a933-4bcc-4e1d-9d51-5f284b938171
Ancestors: MonticelloConfigurations-bf.107

Use UIManager's facilities for showing menus.

=============== Diff against MonticelloConfigurations-bf.107 ===============

Item was changed:
  ----- Method: MCConfigurationBrowser>>installMenu (in category 'actions') -----
  installMenu
+ | action |
+ action := UIManager default
+ chooseFrom: #('load packages' 'merge packages' 'upgrade packages')
+ values: #(#load #merge #upgrade)
+ lines: #()
+ title: ''.
+ self halt.
+ self perform: action.!
-
- | menu |
- menu := MenuMorph new defaultTarget: self.
- menu add: 'load packages' action: #load.
- menu add: 'merge packages' action: #merge.
- menu add: 'upgrade packages' action: #upgrade.
- menu popUpInWorld.!

Item was changed:
  ----- Method: MCConfigurationBrowser>>updateMenu (in category 'actions') -----
  updateMenu
+ | action |
+ action := UIManager default
+ chooseFrom: #('update all from image' 'update all from repositories')
+ values: #(#updateFromImage #updateFromRepositories)
+ lines: #()
+ title: ''.
 
+ self perform: action.!
- | menu |
- menu := MenuMorph new defaultTarget: self.
- menu add: 'update all from image' action: #updateFromImage.
- menu add: 'update all from repositories' action: #updateFromRepositories.
- menu popUpInWorld.!