diff options
-rw-r--r-- | lbu-listbackups-html.lsp | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/lbu-listbackups-html.lsp b/lbu-listbackups-html.lsp new file mode 100644 index 0000000..ad26069 --- /dev/null +++ b/lbu-listbackups-html.lsp @@ -0,0 +1,39 @@ +<? 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>") +--]] +?> + +<H1>Backup Archive</H1> +<DL> +<? if #view.value == 0 then ?> +No backup files +<? else + local selected = false ?> + <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="deletebackup?backup="..name, label="Delete "} ?> + <? if name == view.selected then + selected = true ?> + selected + <? else ?> + <?= html.link{value="selectbackup?backup="..name, label="Select "} ?> + <? end ?> + </td> + <td><?= name ?></td></tr> + <? end + if not selected then ?> + Warning!! Selecting a backup file will cause the current lbu overlay to be lost!! + <? end +end ?> +</table> +</DL> |