summaryrefslogtreecommitdiffstats
path: root/lbu-read-html.lsp
blob: bfd986a2cfef828ba0bbb038f1cdbd95170e0a17 (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
<? 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 : ?>