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]
the assignment to the block parameter
x := x rounded is in red in Pharo 7.
Is that not (/no longer) allowed?
Name: PlotMorph-StephanEggermont.8
Author: StephanEggermont
Time: 11 September 2017, 12:27:45.971839 pm
UUID: f65d521d-4915-0d00-821a-53ce0d9ac81c
Ancestors: PlotMorph-StephaneDucasse.7
Added <example> pragmas to PlotMorph. Opened examples in a window.
Replaced #deprecatedExplanation: by #deprecated:
Fixed PlotPoint constructor
Name: ConfigurationOfPlotMorph-StephanEggermont.5
Author: StephanEggermont
Time: 11 September 2017, 12:29:19.779132 pm
UUID: adbfe922-4915-0d00-821b-1f5a0d9ac81c
Ancestors: ConfigurationOfPlotMorph-StephanEggermont.4
New version for Pharo 6 and 7
