[squeak-dev] The Trunk: Morphic-cmm.400.mcz
commits at source.squeak.org
commits at source.squeak.org
Sun Mar 28 00:21:21 UTC 2010
Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.400.mcz
==================== Summary ====================
Name: Morphic-cmm.400
Author: cmm
Time: 27 March 2010, 7:19:35.033 pm
UUID: 5c9259f0-38b9-4981-9faf-b9daff0fff19
Ancestors: Morphic-cmm.390, Morphic-nice.399
Added help... back to the world menu. If we want to clean up the World menu, we should do something that allows both it _and_ the docking-bar menu to be constructed from one unified place, so that changing that place affects both menus the same.
=============== Diff against Morphic-nice.399 ===============
Item was added:
+ ----- Method: TheWorldMainDockingBar>>accessoriesOn: (in category 'construction') -----
+ accessoriesOn: aDockingBarMorph
+ aDockingBarMorph
+ addSpace: 10 ;
+ addMorphBack:
+ (TextMorph new
+ height: aDockingBarMorph height ;
+ hResizing: #spaceFill ;
+ backgroundColor: aDockingBarMorph color slightlyDarker ;
+ contentsWrapped: '<replace with search term and press command+B>') ;
+ addSpace: 50 ;
+ addMorphBack:
+ (ClockMorph new
+ vResizing: #shrinkWrap ;
+ yourself)!
Item was added:
+ ----- Method: TheWorldMainDockingBar>>clockOn: (in category 'construction') -----
+ clockOn: aDockingBar
+ aDockingBar addMorphBack: ClockMorph new!
Item was changed:
----- Method: TheWorldMenu>>addUtilities: (in category 'construction') -----
addUtilities: menu
Preferences simpleMenus ifFalse: [
self
fillIn: menu
from: {
{ 'open...'. { self. #openWindow } }.
{ 'windows...'. { self. #windowsDo } }.
{ 'changes...'. { self. #changesDo } }
} ].
self
fillIn: menu
from: {
+ { 'help...'. { self. #helpDo }. 'puts up a menu of useful items for updating the system, determining what version you are running, and much else' }.
- " { 'help...'. { self. #helpDo }. 'puts up a menu of useful items for updating the system, determining what version you are running, and much else' }."
{ 'appearance...'. { self. #appearanceDo }. 'put up a menu offering many controls over appearance.' }
}.
Preferences simpleMenus ifFalse: [
self
fillIn: menu
from: {
{ 'do...'. { Utilities. #offerCommonRequests }. 'put up an editible list of convenient expressions, and evaluate the one selected.' }
} ]!
Item was changed:
----- Method: TheWorldMainDockingBar>>fillDockingBar: (in category 'construction') -----
+ fillDockingBar: aDockingBarMorph
- fillDockingBar: aDockingBar
"Private - fill the given docking bar"
+ aDockingBarMorph addSpace: 6.
+ self
+ menusOn: aDockingBarMorph ;
+ accessoriesOn: aDockingBarMorph.
+ aDockingBarMorph
+ setProperty: #mainDockingBarTimeStamp
-
- aDockingBar addSpace: 6.
- self menusOn: aDockingBar.
- aDockingBar
- setProperty: #mainDockingBarTimeStamp
toValue: self class timeStamp!
More information about the Squeak-dev
mailing list
|