diff options
author | Andrew Cady <d@jerkface.net> | 2014-01-17 09:43:45 -0500 |
---|---|---|
committer | Andrew Cady <d@jerkface.net> | 2014-01-17 09:43:45 -0500 |
commit | 3b79da604809c2bce376938bb52d9e68af2438b5 (patch) | |
tree | 7611ea9beb64a9ed9d7541a6631dafe94de4871f | |
parent | cd8e459100ad72ed9922768c09597245f379368c (diff) |
use smaller circles in circle mode
-rw-r--r-- | axis.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -39,7 +39,7 @@ _USE_HEXAGONS = True | |||
39 | _drawHexircle f v x y s c = | 39 | _drawHexircle f v x y s c = |
40 | if _USE_HEXAGONS | 40 | if _USE_HEXAGONS |
41 | then _drawHexagonSDL f v x y s c | 41 | then _drawHexagonSDL f v x y s c |
42 | else (if f then SDL.Primitive.filledCircle else SDL.Primitive.circle) v x y (s * 7 `div` 8) c | 42 | else (if f then SDL.Primitive.filledCircle else SDL.Primitive.circle) v x y (s * 7 `div` 9) c |
43 | 43 | ||
44 | drawHexircle = _drawHexircle False | 44 | drawHexircle = _drawHexircle False |
45 | drawFilledHexircle = _drawHexircle True | 45 | drawFilledHexircle = _drawHexircle True |