The Trunk: ST80-dtl.80.mcz

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

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

Name: ST80-dtl.80
Author: dtl
Time: 28 December 2009, 8:29:01 am
UUID: 8878a8a3-abe2-441f-b102-a57397d4bc0d
Ancestors: ST80-nice.79

Move #restoreDisplay implementation from ScreenController to Project to eliminate #isMorphic sends.

Move #offerMenuFrom:shifted: from StringHolder to Project to eliminate #isMorphic send.

=============== Diff against ST80-nice.79 ===============

Item was changed:
  ----- Method: ScreenController>>restoreDisplay (in category 'menu messages') -----
  restoreDisplay
  "Clear the screen to gray and then redisplay all the scheduled views."
 
+ Project current restoreDisplay
+ !
- Smalltalk isMorphic ifTrue: [^ World restoreMorphicDisplay].
-
- Display extent = DisplayScreen actualScreenSize
- ifFalse:
- [DisplayScreen startUp.
- ScheduledControllers unCacheWindows].
- ScheduledControllers restore!

Item was added:
+ ----- Method: MVCProject>>restoreDisplay (in category 'display') -----
+ restoreDisplay
+ "Clear the screen to gray and then redisplay all the scheduled views."
+
+ Display extent = DisplayScreen actualScreenSize
+ ifFalse:
+ [DisplayScreen startUp.
+ ScheduledControllers unCacheWindows].
+ ScheduledControllers restore!

Item was added:
+ ----- Method: MVCProject>>offerMenuFrom:shifted: (in category 'utilities') -----
+ offerMenuFrom: menuRetriever shifted: aBoolean
+ "Pop up a menu whose target is the receiver and whose contents are provided
+ by sending the menuRetriever to the receiver. The menuRetriever takes two
+ arguments: a menu, and a boolean representing the shift state."
+
+ | aMenu |
+ aMenu := CustomMenu new.
+ self perform: menuRetriever with: aMenu with: aBoolean.
+ aMenu invokeOn: self!