<@6> <@local(ps,name,id,root,switch,nclose,max_depth)> <@> <$name = argv#0> <$root = argv#1> <$id = 'sidetag' . v.plugin_num(name))> <$ps = v.load_plgset(name)> <$switch = ps.switch)> <$nclose = ps.nclose> <$max_depth = (ps.depth || 3)-1> <@> <@>--------------------------------------------------------------------- <@>再帰サブルーチン <@>--------------------------------------------------------------------- <$sub = begin.function> <@local(t, p, node, tree, depth, x)> <$node = argv#0> <$tree = node.children || []> <$depth = argv#1><@>prefix <$p = "\t" %x depth> <@p> <$end.function> <@>--------------------------------------------------------------------- <@>コンテンツリスト <@>--------------------------------------------------------------------- <@ifexec(root && root.pkey, begin, begin)>
<@root.title>
<$else>
<@ps.title || 'コンテンツ'>
<$end>
<@ifexec(root, begin)> <@exec(sub, root, 0)> <$end>