Makie delete gridlayout recursively

makie_delete_gridlayout_recursively.jl

using GLMakie

f = Figure()
b = Button(f[1, 1], tellwidth = false)
gl = GridLayout(f[2, 1])

function delete_contents!(gl::GridLayout)
    for c in contents(gl)
        if c isa GridLayout
            delete_contents!(c)
            Makie.GridLayoutBase.remove_from_gridlayout!(c.layoutobservables.gridcontent[])
        else
            delete!(c)
        end
    end
    trim!(gl)
    return
end

function populate_gl!(gl::GridLayout)
    for i in 1:2, j in 1:2
        if rand() < 0.10
            subgl = GridLayout(gl[i, j])
            populate_gl!(subgl)
        else
            (rand() > 0.5 ? Axis : PolarAxis)(gl[i, j])
        end
    end
end

on(b.clicks) do _
    delete_contents!(gl)
    populate_gl!(gl)
end

populate_gl!(gl)

f