[ENH] [L&F] WorldsOfSqueakWin-dgd
diegogomezdeck at consultar.com
diegogomezdeck at consultar.com
Fri Nov 14 11:11:38 UTC 2003
'From Squeak3.7alpha of ''11 September 2003'' [latest update: #5545] on 14
November 2003 at 10:28:14 am'!
"Change Set: WorldsOfSqueakWin-dgd
Date: 20 July 2003
Author: Diego Gomez Deck and Doug Way
- Recreate the outer window for 'The Worlds of Squeak' to update the look.
- Remove the old outer window for 'The Worlds of Squeak' Projectview, and
replace with a newly created window to match the others. (new window code
added by Doug Way).
"
(SystemWindow
windowsIn: World
satisfying: [:each | each label = 'The Worlds of Squeak'])
do: [:oldWindow |
| content newWindow |
oldWindow activate.
content := oldWindow paneMorphs first.
newWindow _ SystemWindow labelled: 'The Worlds of
Squeak'.
newWindow
addMorph: content
fullFrame: (LayoutFrame fractions: (0 at 0
corner: 1 at 1)).
newWindow model: oldWindow model.
newWindow paneColor: content thumbnail
dominantColor.
newWindow openInWorldExtent: oldWindow extent.
newWindow position: oldWindow position.
oldWindow model: nil.
oldWindow delete.].
!
-------------- next part --------------
A non-text attachment was scrubbed...
Name: WorldsOfSqueakWin-dgd.1.cs.gz
Type: application/x-gzip-compressed
Size: 546 bytes
Desc: not available
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20031114/2c66a8e1/WorldsOfSqueakWin-dgd.1.cs.bin
More information about the Squeak-dev
mailing list
|