Recursive rendering of menus with Fusion

Recursion.fusion

prototype(Flowpack.FusionBP:RecursiveMenu) < prototype(Neos.Fusion:Array) {
    @process.tmpl = ${'<li>' + value + '</li>'}
    title = ${node.properties.title || '<em>' + node.name + '</em>'}
    nextLevel = Neos.Fusion:Collection {
        @process.tmpl = ${'<ul>' + value + '</ul>'}
        @process.tmpl.@if.notEmpty = ${q(node).children().count() > 0}
        collection = ${q(node).children().get()}
        itemName = 'node'
        itemRenderer = Flowpack.FusionBP:RecursiveMenu
    }
}

root = Flowpack.FusionBP:RecursiveMenu {
    @context.node = ${site}
    @process.wrap = ${'<ul>' + value + '</ul>'}
}