summaryrefslogtreecommitdiffstats
path: root/lbu-listbackups-html.lsp
blob: 5995c2b02bd91e2352234c9c9bbe5395d0cbab30 (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
28
29
30
31
<? local view, viewlibrary, pageinfo, session = ... 
require("viewfunctions")
?>
<?
--[[ DEBUG INFORMATION
io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>")
io.write(html.cfe_unpack(view))
io.write("</span>")
--]]
?>

<? displaycommandresults({"selectbackup"}, session) ?>

<H1>Backup Archive</H1>
<DL>
<? if #view.value == 0 then ?>
No backup files
<? else ?>
	<table><tr>
		<td class="header">Action</td>
		<td class="header">File</td>
	</tr>
	<? for i,name in ipairs(view.value) do ?>
		<tr><td>
			<?= html.link{value="selectbackup?backup="..name, label="Select "} ?>
		</td>
		<td><?= name ?></td></tr>
	<? end
end ?>
</table>
</DL>