Differences From
Artifact [8016afcf69]:
85 85 if started then list:lpush('</ol>') end
86 86 end
87 87
88 88 local terra
89 89 render_docpage(co: &lib.srv.convo, pg: pref)
90 90 var nullprivs: lib.store.powerset nullprivs:clear()
91 91 if not pg then -- display index
92 - var list: lib.str.acc list:compose('<ul>')
92 + var list = co:stra(256)
93 + list:lpush('<ul>')
93 94 var [pages] = array([allpages])
94 95 for i=0,[pages.type.N] do
95 96 if pages[i].parent == 0 and (pages[i].priv:sz() == 0 or
96 97 (co.aid ~= 0 and (co.who.rights.powers
97 98 and pages[i].priv):sz() > 0)) then
98 99 list:lpush('<li><a href="/doc/'):rpush(pages[i].name):lpush('">')
99 100 :rpush(pages[i].title):lpush('</a>')
................................................................................
103 104 pushbranches(&list, i, nullprivs)
104 105 end
105 106 list:lpush('</li>')
106 107 end
107 108 end
108 109 list:lpush('</ul>')
109 110
110 - var bp = list:finalize()
111 111 co:stdpage(page {
112 112 title = 'documentation';
113 - body = bp;
113 + body = list:finalize();
114 114 class = P'doc listing';
115 115 cache = false;
116 116 })
117 - bp:free()
118 117 else showpage(co, pg) end
119 118 end
120 119
121 120 return render_docpage