allow spacing via extra_kwargs

This commit is contained in:
t-bltg 2021-07-03 20:05:53 +02:00
parent 14b38354da
commit 293b43013b

View File

@ -1162,7 +1162,7 @@ function gr_legend_pos(theta::Real, leg, viewport_plotarea; axisclearance=nothin
end end
function gr_get_legend_geometry(viewport_plotarea, sp) function gr_get_legend_geometry(viewport_plotarea, sp)
legendn = legendw = 0; dy = 0. legendn = legendw = dy = 0
if sp[:legend] != :none if sp[:legend] != :none
GR.savestate() GR.savestate()
GR.selntran(0) GR.selntran(0)
@ -1197,6 +1197,8 @@ function gr_get_legend_geometry(viewport_plotarea, sp)
x_legend_offset = (viewport_plotarea[2] - viewport_plotarea[1]) / 30 x_legend_offset = (viewport_plotarea[2] - viewport_plotarea[1]) / 30
y_legend_offset = (viewport_plotarea[4] - viewport_plotarea[3]) / 30 y_legend_offset = (viewport_plotarea[4] - viewport_plotarea[3]) / 30
dy *= get(sp[:extra_kwargs], :legend_hfactor, 1)
legendh = dy * legendn legendh = dy * legendn
return ( return (