Hi Alexandre, On 29 March 2018 at 15:07, Alexandre Bergel <alexandre.bergel@me.com> wrote:
Easy.
You can add a reset button: -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= v := RTView new. b := [ :someClasses | g := RTGrapher new. g view: v. ds := RTData new. ds points: someClasses. ds y: [ :cls | cls numberOfMethods ]. ds x: [ :cls | cls numberOfLinesOfCode ]. g add: ds.
g addDecorator: (RTRangeSelector new callback: [ :es | | classesToZoomIn |
classesToZoomIn := es collect: #model. v cleanAll. b value: classesToZoomIn ]). g build. v addMenu: 'Reset' callback: [ v cleanAll. b value: RTShape withAllSubclasses ]. ].
b value: RTShape withAllSubclasses. v -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Thanks! All working now... Cheers, Alistair