Torsten Bergmann uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-tbn.293.mcz==================== Summary ====================
Name: Morphic-tbn.293
Author: tbn
Time: 4 January 2010, 12:53:09 pm
UUID: e1fe8a84-2b71-0741-821c-0504683bfa74
Ancestors: Morphic-ar.292
Fix for
http://bugs.squeak.org/view.php?id=7435=============== Diff against Morphic-ar.292 ===============
Item was changed:
----- Method: PasteUpMorph>>addCustomMenuItems:hand: (in category 'menu & halo') -----
addCustomMenuItems: menu hand: aHandMorph
"Add morph-specific menu itemns to the menu for the hand"
super addCustomMenuItems: menu hand: aHandMorph.
menu addLine.
Preferences noviceMode
ifFalse: [
self addStackMenuItems: menu hand: aHandMorph.
self addPenMenuItems: menu hand: aHandMorph.
self addPlayfieldMenuItems: menu hand: aHandMorph].
self isWorldMorph
ifTrue: [
menu addLine.
Preferences noviceMode
ifFalse: [(owner isKindOf: BOBTransformationMorph)
ifTrue: [self addScalingMenuItems: menu hand: aHandMorph]].
menu addUpdating: #showWorldMainDockingBarString action: #toggleShowWorldMainDockingBar.
Flaps sharedFlapsAllowed ifTrue: [
menu
addUpdating: #suppressFlapsString
target: Project current
action: #toggleFlapsSuppressed.
].
- Project current showWorldMainDockingBar ifFalse:[
- menu addLine.
- TheWorldMainDockingBar instance fillMenuItemsBar: menu.
- ].
-
Preferences noviceMode ifFalse: [| twm |
menu addLine.
twm := TheWorldMenu new.
twm world: self project: Project current hand: aHandMorph.
menu add: 'old desktop menu... (W)' translated subMenu: twm buildWorldMenu.
].
].
!