From 80dcbfa5a0af2a90e0e0fada05d67fef0cc97c3d Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Tue, 22 Apr 2008 15:25:14 +0000
Subject: Adding

git-svn-id: svn://svn.alpinelinux.org/acf/apk/trunk@1032 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 apk-html.lsp | 71 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)
 create mode 100644 apk-html.lsp

(limited to 'apk-html.lsp')

diff --git a/apk-html.lsp b/apk-html.lsp
new file mode 100644
index 0000000..81288f4
--- /dev/null
+++ b/apk-html.lsp
@@ -0,0 +1,71 @@
+<? local form = ... ?>
+<?
+--[[ DEBUG INFORMATION
+io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>")
+io.write(html.cfe_unpack(form))
+io.write("</span>")
+--]]
+?>
+
+<? if form.cmdresult then ?>
+<H1>Command Result</H1>
+<DL>
+<?= form.cmdresult ?>
+</DL>
+<? end ?>
+
+<? if form.loaded then ?>
+<H1>Loaded Packages</H1>
+<DL>
+<TABLE>
+	<TR style="background:#eee;font-weight:bold;">
+		<TD style="padding-right:20px;white-space:nowrap;" class="header">Delete</TD>
+		<TD style="padding-right:20px;white-space:nowrap;" class="header">Package Name</TD>
+		<TD style="padding-right:20px;white-space:nowrap;" class="header">Version</TD>
+		<TD style="white-space:nowrap;" class="header">Description</TD>
+	</TR>
+
+<? for i,packagetable in pairs(form.loaded) do ?>
+	<TR>
+		<TD style="padding-right:20px;white-space:nowrap;">
+		<?= html.link{value = "delete?package=" .. packagetable.name, label="Delete"} ?>
+		</TD>
+		<TD><?= packagetable.name ?></TD>
+		<TD><?= packagetable.version ?></TD>
+		<TD><?= packagetable.description ?></TD>
+	</TR>
+<? end ?>
+</TABLE>
+</DL>
+<? end ?>
+
+<? if form.available then ?>
+<H1>Available Packages</H1>
+<DL>
+<TABLE>
+	<TR style="background:#eee;font-weight:bold;">
+		<TD style="padding-right:20px;white-space:nowrap;" class="header">Install</TD>
+		<TD style="white-space:nowrap;" WIDTH="90%" class="header">Package Name</TD>
+	</TR>
+
+<? for i,package in pairs(form.available) do ?>
+	<TR>
+		<TD style="padding-right:20px;white-space:nowrap;">
+		<?= html.link{value = "install?package=" .. package, label="Install"} ?>
+		</TD>
+		<TD><?= package ?></TD>
+	</TR>
+<? end ?>
+</TABLE>
+</DL>
+<? end ?>
+
+<?
+--[[ DEBUG INFORMATION
+io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>")
+io.write(html.cfe_unpack(form))
+io.write("</span>")
+--]]
+?>
+
+
-- 
cgit v1.2.3