[Pkg] The Trunk: Monticello-kb.370.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Feb 24 18:57:03 UTC 2010
Andreas Raab uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-kb.370.mcz
==================== Summary ====================
Name: Monticello-kb.370
Author: kb
Time: 24 February 2010, 7:46:39.876 pm
UUID: 71e11e7c-cf38-4e34-a6c0-ae342347e2a5
Ancestors: Monticello-kb.369
- Shout styling for the MCSnapshotBrowser using ToolBuilder
=============== Diff against Monticello-cmm.367 ===============
Item was added:
+ ----- Method: MCSnapshotBrowser>>aboutToStyle: (in category 'morphic ui') -----
+ aboutToStyle: aStyler
+
+ aStyler classOrMetaClass: (
+ (methodSelection isNil and: [
+ protocolSelection isNil and: [
+ classSelection notNil ] ])
+ ifFalse: [ self selectedClassOrMetaClass ]
+ ifTrue: [ nil ]).
+ ^true
+ !
Item was changed:
----- Method: MCVersion>>browse (in category 'actions') -----
browse
(MCSnapshotBrowser forSnapshot: self snapshot)
+ label: 'Snapshot of ', self fileName;
+ show!
- showLabelled: 'Snapshot of ', self fileName!
Item was changed:
----- Method: MCSnapshotBrowser>>widgetSpecs (in category 'morphic ui') -----
widgetSpecs
Preferences annotationPanes ifFalse: [ ^#(
((listMorph: category) (0 0 0.25 0.4))
((listMorph: class) (0.25 0 0.50 0.4) (0 0 0 -30))
((listMorph: protocol) (0.50 0 0.75 0.4))
((listMorph:selection:menu:keystroke: methodList methodSelection methodListMenu: methodListKey:from:) (0.75 0 1 0.4))
((buttonRow) (0.25 0.4 0.5 0.4) (0 -30 0 0))
+ ((codePane: text) (0 0.4 1 1))
- ((textMorph: text) (0 0.4 1 1))
) ].
^#(
((listMorph: category) (0 0 0.25 0.4))
((listMorph: class) (0.25 0 0.50 0.4) (0 0 0 -30))
((listMorph: protocol) (0.50 0 0.75 0.4))
((listMorph:selection:menu:keystroke: methodList methodSelection methodListMenu: methodListKey:from:) (0.75 0 1 0.4))
((buttonRow) (0.25 0.4 0.5 0.4) (0 -30 0 0))
((textMorph: annotations) (0 0.4 1 0.4) (0 0 0 30))
((textMorph: text) (0 0.4 1 1) (0 30 0 0))
)!
Item was added:
+ ----- Method: MCToolWindowBuilder>>codePane: (in category 'as yet unclassified') -----
+ codePane: aSymbol
+ | text |
+ text := builder pluggableCodePaneSpec new.
+ text
+ model: tool;
+ getText: aSymbol;
+ setText: (aSymbol, ':') asSymbol;
+ frame: currentFrame.
+ window children add: text!
Item was changed:
SystemOrganization addCategory: #'Monticello-Base'!
SystemOrganization addCategory: #'Monticello-Chunk Format'!
SystemOrganization addCategory: #'Monticello-Loading'!
SystemOrganization addCategory: #'Monticello-Merging'!
SystemOrganization addCategory: #'Monticello-Modeling'!
SystemOrganization addCategory: #'Monticello-Patching'!
SystemOrganization addCategory: #'Monticello-Repositories'!
SystemOrganization addCategory: #'Monticello-Storing'!
SystemOrganization addCategory: #'Monticello-UI'!
SystemOrganization addCategory: #'Monticello-Versioning'!
- SystemOrganization addCategory: #'Monticello-Mocks'!
More information about the Packages
mailing list