The Trunk: Network-dtl.57.mcz

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

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

Name: Network-dtl.57
Author: dtl
Time: 10 February 2010, 11:20:58.457 am
UUID: b88ac355-76a2-43c9-86d7-a0a3e150cbcd
Ancestors: Network-nice.56

Move #fullScreenOn and #fullScreenOff implementation from ScreenController to Project
Change MailComposition to dispatch through Project current for open in MVC/Morphic.

=============== Diff against Network-nice.56 ===============

Item was changed:
+ ----- Method: MailComposition>>open (in category 'initialize-release') -----
- ----- Method: MailComposition>>open (in category 'interface') -----
  open
  "open an interface"
+
+ ^ Project current
+ dispatchTo: self
+ addPrefixAndSend: #Open
+ withArguments: {}
+ !
- Smalltalk isMorphic
- ifTrue: [ self openInMorphic ]
- ifFalse: [ self openInMVC ]!

Item was removed:
- ----- Method: MailComposition>>openInMorphic (in category 'interface') -----
- openInMorphic
- "open an interface for sending a mail message with the given initial
- text "
- | textMorph buttonsList sendButton attachmentButton |
- morphicWindow := SystemWindow labelled: 'Mister Postman'.
- morphicWindow model: self.
- textEditor := textMorph := PluggableTextMorph
- on: self
- text: #messageText
- accept: #messageText:
- readSelection: nil
- menu: #menuGet:shifted:.
- morphicWindow addMorph: textMorph frame: (0 @ 0.1 corner: 1 @ 1).
- buttonsList := AlignmentMorph newRow.
- sendButton := PluggableButtonMorph
- on: self
- getState: nil
- action: #submit.
- sendButton
- hResizing: #spaceFill;
- vResizing: #spaceFill;
- label: 'send message';
- setBalloonText: 'Accept any unaccepted edits and add this to the queue of messages to be sent';
- onColor: Color white offColor: Color white.
- buttonsList addMorphBack: sendButton.
-
- attachmentButton := PluggableButtonMorph
- on: self
- getState: nil
- action: #addAttachment.
- attachmentButton
- hResizing: #spaceFill;
- vResizing: #spaceFill;
- label: 'add attachment';
- setBalloonText: 'Send a file with the message';
- onColor: Color white offColor: Color white.
- buttonsList addMorphBack: attachmentButton.
-
- morphicWindow addMorph: buttonsList frame: (0 @ 0 extent: 1 @ 0.1).
- morphicWindow openInWorld!