print each road name once only
This commit is contained in:
parent
7195dbb2d5
commit
e728052bb6
@ -143,6 +143,7 @@ label.readout {
|
|||||||
cairo.Content.COLOR
|
cairo.Content.COLOR
|
||||||
(* tile-size (+ 4 num-tiles-x))
|
(* tile-size (+ 4 num-tiles-x))
|
||||||
(* tile-size (+ 4 num-tiles-y)))
|
(* tile-size (+ 4 num-tiles-y)))
|
||||||
|
seen-road-names {}
|
||||||
g (cairo.Context.create map-surface)]
|
g (cairo.Context.create map-surface)]
|
||||||
|
|
||||||
(g:set_source_rgb 0.7 0.8 0.8)
|
(g:set_source_rgb 0.7 0.8 0.8)
|
||||||
@ -164,7 +165,8 @@ label.readout {
|
|||||||
ext (g:text_extents n)
|
ext (g:text_extents n)
|
||||||
w ext.width
|
w ext.width
|
||||||
h ext.height]
|
h ext.height]
|
||||||
(when (and x y)
|
(when (and x y (not (. seen-road-names n)))
|
||||||
|
(tset seen-road-names n true)
|
||||||
(g:save)
|
(g:save)
|
||||||
(g:set_line_width h)
|
(g:set_line_width h)
|
||||||
(g:set_source_rgb 1 1 1)
|
(g:set_source_rgb 1 1 1)
|
||||||
|
Loading…
Reference in New Issue
Block a user