[Pkg] The Trunk: 60Deprecated-pre.25.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Oct 13 12:26:58 UTC 2018


Patrick Rein uploaded a new version of 60Deprecated to project The Trunk:
http://source.squeak.org/trunk/60Deprecated-pre.25.mcz

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

Name: 60Deprecated-pre.25
Author: pre
Time: 13 October 2018, 2:25:15.766477 pm
UUID: d9e05404-90d5-4047-bf7a-37e2edb39963
Ancestors: 60Deprecated-ul.24

Deprecates the mvcOpen method of FancyMailComposition. It introduces a dependency from Morphic to ST-80 and the tool, if to be preserved, should be toolbuilderized.

=============== Diff against 60Deprecated-ul.24 ===============

Item was added:
+ ----- Method: FancyMailComposition>>mvcOpen (in category '*60Deprecated-ST80-Support') -----
+ mvcOpen
+ 	| textView sendButton  |
+ 
+ 	mvcWindow := StandardSystemView new
+ 		label: 'Mister Postman';
+ 		minimumSize: 400 at 250;
+ 		model: self.
+ 
+ 	textView := PluggableTextView
+ 		on: self
+ 		text: #messageText
+ 		accept: #messageText:.
+ 	textEditor := textView controller.
+ 
+ 	sendButton := PluggableButtonView 
+ 		on: self
+ 		getState: nil
+ 		action: #submit.
+ 	sendButton label: 'Send'.
+ 	sendButton borderWidth: 1.
+ 
+ 	sendButton window: (1 at 1 extent: 398 at 38).
+ 	mvcWindow addSubView: sendButton.
+ 
+ 	textView window: (0 at 40 corner: 400 at 250).
+ 	mvcWindow addSubView: textView below: sendButton.
+ 
+ 	mvcWindow controller open.
+ 
+ 		
+ !



More information about the Packages mailing list