[Pkg] The Trunk: EToys-ar.69.mcz

commits at source.squeak.org commits at source.squeak.org
Fri May 21 03:00:39 UTC 2010


Andreas Raab uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-ar.69.mcz

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

Name: EToys-ar.69
Author: ar
Time: 20 May 2010, 7:59:38.477 pm
UUID: 9537ff3f-27bd-de4d-a5d0-dc0befc8c859
Ancestors: EToys-ar.68

Add isolated code pane creation back to MethodHolder as Etoys extension.

=============== Diff against EToys-ar.68 ===============

Item was added:
+ ----- Method: MethodHolder class>>isolatedCodePaneForClass:selector: (in category '*Etoys') -----
+ isolatedCodePaneForClass: aClass selector: aSelector
+ 	"Answer a MethodMorph on the given class and selector"
+ 
+ 	| aCodePane aMethodHolder |
+ 
+ 	aMethodHolder := self new.
+ 	aMethodHolder methodClass: aClass methodSelector: aSelector.
+ 
+ 	aCodePane := MethodMorph on: aMethodHolder text: #contents accept: #contents:notifying:
+ 			readSelection: #contentsSelection menu: #codePaneMenu:shifted:.
+ 	aMethodHolder addDependent: aCodePane.
+ 	aCodePane borderWidth: 2; color: Color white.
+ 	aCodePane scrollBarOnLeft: false.
+ 	aCodePane width: 300.
+ 	^ aCodePane!

Item was added:
+ ----- Method: MethodHolder class>>makeIsolatedCodePaneForClass:selector: (in category '*Etoys') -----
+ makeIsolatedCodePaneForClass: aClass selector: aSelector
+ 	"Create, and place in the morphic Hand, an isolated code pane bearing source code for the given class and selector"
+ 
+ 	(self isolatedCodePaneForClass: aClass selector: aSelector) openInHand!



More information about the Packages mailing list