[squeak-dev] The Trunk: MorphicExtras-ar.45.mcz

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

[squeak-dev] The Trunk: MorphicExtras-ar.45.mcz

commits-2
Andreas Raab uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-ar.45.mcz

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

Name: MorphicExtras-ar.45
Author: ar
Time: 7 September 2009, 3:09:56 am
UUID: 95e3d35f-5149-0946-9de3-d8314331128b
Ancestors: MorphicExtras-ar.44

Fix users of CustomMenu in Morphic and replace them with proper MenuMorph usage.

=============== Diff against MorphicExtras-ar.44 ===============

Item was changed:
  ----- Method: TextPlusMorph>>doYellowButtonPress: (in category 'as yet unclassified') -----
  doYellowButtonPress: evt
 
  | menu |
 
+ menu := MenuMorph new.
- menu := CustomMenu new.
  menu
  add: 'Go to top of document' action: [self jumpToDocumentTop];
  add: 'Move selection to top of page' action: [self scrollSelectionToTop];
  add: 'Add column break' action: [self addColumnBreak];
  add: 'Define as jump start' action: [self addJumpBeginning];
  add: 'Define as jump end' action: [self addJumpEnd].
+ menu title: 'Text navigation options'.
+ menu invokeModal.
-
- ((menu build startUpCenteredWithCaption: 'Text navigation options') ifNil: [^self]) value.
  !