Stephane Ducasse <stepharo.self@gmail.com> wrote:
Excellent!
On Mon, Sep 11, 2017 at 8:10 PM, stephan <stephan@stack.nl> wrote:
On 11-09-17 19:20, Stephane Ducasse wrote:
Stefan
(Did you publish the configuration in the PlotMorph repo?) ifTrue: [ Stefan isPerfect ]
PlotMorph, MetaRepos for Pharo 5 and 6 :)
Unfortunatley not. That error has gone but I now get Fetched -> ConfigurationOfPlotMorph-StephanEggermont.5 --- http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ --- http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ Loaded -> ConfigurationOfPlotMorph-StephanEggermont.5 --- http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ --- http://smalltalkhub.com/mc/Pharo/MetaRepoForPharo60/main/ Loading 1.1 of ConfigurationOfPlotMorph... Fetched -> PlotMorph-StephanEggermont.8 --- http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ --- http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ OCStoreIntoReadOnlyVariableError: Cannot store into PlotMorphGrid drawGridOn: aCanvas | gridColor lighter darker baseColor bounds | baseColor := plot baseColor alpha: 1. lighter := baseColor twiceLighter. darker := baseColor twiceDarker. gridColor := (lighter diff: baseColor) > (darker diff: baseColor) ifTrue: [ lighter ] ifFalse: [ darker ]. bounds := plot drawBounds. (bounds left to: bounds right by: (self bestStep: bounds width)) do: [ :x | x := x rounded. aCanvas line: x @ bounds top to: x @ bounds bottom color: gridColor ]. (bounds top to: bounds bottom by: (self bestStep: bounds height)) do: [ :y | y := y rounded. aCanvas line: bounds left @ y to: bounds right @ y color: gridColor ] OCStoreIntoReadOnlyVariableError: Cannot store into PlotMorphGrid drawGridOn: aCanvas | gridColor lighter darker baseColor bounds | baseColor := plot baseColor alpha: 1. lighter := baseColor twiceLighter. darker := baseColor twiceDarker. gridColor := (lighter diff: baseColor) > (darker diff: baseColor) ifTrue: [ lighter ] ifFalse: [ darker ]. bounds := plot drawBounds. (bounds left to: bounds right by: (self bestStep: bounds width)) do: [ :x | x := x rounded. aCanvas line: x @ bounds top to: x @ bounds bottom color: gridColor ]. (bounds top to: bounds bottom by: (self bestStep: bounds height)) do: [ :y | y := y rounded. aCanvas line: bounds left @ y to: bounds right @ y color: gridColor ] OCStoreIntoReadOnlyVariableError: Cannot store into AxesMorph drawGridOn: aCanvas | gridColor right bottom width height lighter darker baseColor | baseColor := self baseColor. lighter := baseColor twiceLighter. darker := baseColor twiceDarker. gridColor := (lighter diff: baseColor) > (darker diff: baseColor) ifTrue: [ lighter ] ifFalse: [ darker ]. right := self bounds width - margin. width := self bounds width - (margin * 2). bottom := self bounds height - margin. height := self bounds height - (margin * 2). (margin to: right by: width / 10) do: [ :x | x := x rounded. aCanvas line: x @ margin to: x @ bottom color: gridColor ]. (margin to: bottom by: height / 10) do: [ :y | y := y rounded. aCanvas line: margin @ y to: right @ y color: gridColor ] OCStoreIntoReadOnlyVariableError: Cannot store into AxesMorph drawGridOn: aCanvas | gridColor right bottom width height lighter darker baseColor | baseColor := self baseColor. lighter := baseColor twiceLighter. darker := baseColor twiceDarker. gridColor := (lighter diff: baseColor) > (darker diff: baseColor) ifTrue: [ lighter ] ifFalse: [ darker ]. right := self bounds width - margin. width := self bounds width - (margin * 2). bottom := self bounds height - margin. height := self bounds height - (margin * 2). (margin to: right by: width / 10) do: [ :x | x := x rounded. aCanvas line: x @ margin to: x @ bottom color: gridColor ]. (margin to: bottom by: height / 10) do: [ :y | y := y rounded. aCanvas line: margin @ y to: right @ y color: gridColor ] Loaded -> PlotMorph-StephanEggermont.8 --- http://smalltalkhub.com/mc/PharoExtras/PlotMorph/main/ --- cache ...finished 1.1 -- Mark