The Trunk: Morphic-dtl.249.mcz

David T. Lewis uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-dtl.249.mcz

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

Name: Morphic-dtl.249
Author: dtl
Time: 25 November 2009, 2:15:17 am
UUID: d5242725-fcc1-4a74-bf71-c9719a6097b7
Ancestors: Morphic-dtl.248

Move project navigation and menu methods from class side of Project to instance methods. Replace #isMorphic logic with dispatch to appropriate project instances for MVC and Morphic conditions.

=============== Diff against Morphic-dtl.248 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBarOld>>jumpToProject (in category 'menu actions') -----
  jumpToProject
+ Project current jumpToProject!
- Project jumpToProject!

Item was added:
+ ----- Method: MorphicProject>>jumpToProject (in category 'utilities') -----
+ jumpToProject
+ "Present a list of potential projects and enter the one selected."
+
+ "Project current jumpToProject"
+
+ | menu |
+ menu:=MenuMorph new.
+ menu defaultTarget: self.
+ menu := self buildJumpToMenu: menu.
+ menu popUpInWorld!

Item was added:
+ ----- Method: MorphicProject>>addItem:toMenu:selection:requestor: (in category 'utilities') -----
+ addItem: item toMenu: menu selection: action requestor: requestingProject
+ "Add a menu item representing this project to a menu being created by requestingProject"
+
+ | color |
+ "Color to be used for this menu item"
+ color := self world isInMemory
+ ifTrue: [Color black]
+ ifFalse: [Color brown].
+ "Menu item of type appropriate for current project"
+ requestingProject
+ addItem: item
+ toMenu: menu
+ selection: action
+ color: color
+ thumbnail: thumbnail!

Item was changed:
  ----- Method: PasteUpMorph>>jumpToProject (in category 'world state') -----
  jumpToProject
 
+ Project current jumpToProject.
- Project jumpToProject.
  !

Item was changed:
  ----- Method: TheWorldMainDockingBar>>updateJumpToProjectSubMenu: (in category 'submenu - projects') -----
  updateJumpToProjectSubMenu: subMenu
 
  subMenu defaultTarget: Project.
+ Project current buildJumpToMenu: subMenu!
- Project buildJumpToMenu: subMenu!

Item was added:
+ ----- Method: MorphicProject>>addItem:toMenu:selection:color:thumbnail: (in category 'utilities') -----
+ addItem: item toMenu: menu selection: action color: aColor thumbnail: aForm
+ "Add menu item representing the sender to a menu"
+
+ menu
+ add: item
+ selector: #jumpToSelection:
+ argument: action.
+ menu lastItem color: aColor.
+ aForm isNil
+ ifFalse: [menu lastItem
+ icon: (aForm
+ scaledIntoFormOfSize: (Preferences tinyDisplay
+ ifTrue: [16]
+ ifFalse: [28]))]!

Item was removed:
- ----- Method: MorphicProject class>>jumpToProject (in category 'utilities') -----
- jumpToProject
- "Project jumpToProject"
- "Present a list of potential projects and enter the one selected."
- | menu |
- menu:=MenuMorph new.
- menu defaultTarget: self.
- menu := self buildJumpToMenu: menu.
- menu popUpInWorld!