Stephane Ducasse <[email protected]> wrote: > --001a113fc0fc9da22e05592a9f54 > Content-Type: text/plain; charset="UTF-8" > > Hi mark > > live is chaotic here with two or three meetings in parallel, visitors, > and a lecture to finish > Now I tested. I took a Pharo 6.1 32 bits and loaded PlotMorph from the catalog > It load Stefaneggermont.8 > > Can you tell us how to reproduce your problem? >
I get this on both 32 and 64 bit Pharo on OSX 10.12.6 Loaded a new Pharo from https://pharo.org/web/download and removed previous Preferences Then from Calalog Browser Install Stable Version Then 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
