On 15-10-15 09:48, stepharo wrote:
I can imagine that well.
Up to you but I think that having modular parts is nice too.
What we should is a way to automatically update configurations.
I love modular parts. I see a ripple effect
Stephan
p.s. Alex: this breaks the normalizer RTMultiLinearColorForIdentity.
| data b s d |
data := OrderedCollection new.
#(GTDebugger GTInspector GTInspectorCore GTPlayground GTPlaygroundCore
GTSpotter GToolkitCore GlamourCore Rubric) do: [ :aPackageName |
data addAll: (('ConfigurationOf', aPackageName) asClass methods
select: [ :each |
each selector asString beginsWith: 'version' ]
thenCollect: [ :method |
Array
with: aPackageName
with: (DateAndTime today - (DateAndTime fromString: (method
stamp substrings second))) days ])].
b := RTTimeline new.
s := RTTimelineSet new.
s objects: data.
s shape color: Color green.
s lineIdentifier: #first.
s start: #second.
s end: #second.
b add: s.
b axisX
numberOfLabels: 5;
labelRotation: -45.
d := RTVerticalTickLineDecorator new.
d shape line color: Color white.
b addDecorator: d.
b build.
^ b view
