summaryrefslogtreecommitdiffstats
path: root/lbu-read-html.lsp
blob: e44d97a31d6abb1f017b78d49b2a2f1ad00b6427 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
<? local view = ... ?>

<h1>LBU</h1>

<h2>Settings</h2>
<? for i,item in ipairs(view.note or {}) do ?>
	<p class='error'><?= item.content ?></p>
<? end ?>

<? for i,item in ipairs(view.list) do ?>
	<DT><?= item.descr or '' ?></DT>
	<DD><?= html.link{
		value = view.script .. view.prefix .. view.controller .. "/"
		.. view.action .. "?id=" .. tostring(item.id),
		label=item.name
		} ?>
	</DD>
<? end ?>

<h2>Functions</h2>
	<DT>Commit changes</DT>
	<DD><?= html.link{
		value = view.script .. view.prefix .. view.controller .. "/commit",
		label="commit" } ?>
	</DD>

<? -- vim: set filetype=lua : ?>