summaryrefslogtreecommitdiffstats
path: root/shorewall-status-html.lsp
diff options
context:
space:
mode:
authorMika Havela <mika.havela@gmail.com>2008-05-15 15:12:42 +0000
committerMika Havela <mika.havela@gmail.com>2008-05-15 15:12:42 +0000
commita3965b138f8c37b32cc28889250d55e20124983f (patch)
tree158a140cab494c92f9a03f3fa953b45465a3ce14 /shorewall-status-html.lsp
parent2019d21baffd94e03608d28eba103150fb1ba1cd (diff)
downloadacf-shorewall-a3965b138f8c37b32cc28889250d55e20124983f.tar.bz2
acf-shorewall-a3965b138f8c37b32cc28889250d55e20124983f.tar.xz
Saving work for today.
Applying the component functionallity to acf-shorewall. Cleaning up and rebuilding the view-files. git-svn-id: svn://svn.alpinelinux.org/acf/shorewall/trunk@1121 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'shorewall-status-html.lsp')
-rw-r--r--shorewall-status-html.lsp18
1 files changed, 6 insertions, 12 deletions
diff --git a/shorewall-status-html.lsp b/shorewall-status-html.lsp
index 9122797..d670e47 100644
--- a/shorewall-status-html.lsp
+++ b/shorewall-status-html.lsp
@@ -1,22 +1,17 @@
-<? local form = ...
+<? local form, viewlibrary = ...
require("viewfunctions")
-?>
-<?
--[[ DEBUG INFORMATION
io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>")
+io.write(html.cfe_unpack(viewlibrary))
+io.write("----------")
io.write(html.cfe_unpack(form))
io.write("</span>")
--]]
?>
-<H1>SYSTEM INFO</H1>
-<DL>
-<?
-local myform = form.status
-local tags = { "status", "version", "autostart", }
-displayinfo(myform,tags,"viewonly")
-?>
-</DL>
+<? if viewlibrary and viewlibrary.dispatch_component then
+ viewlibrary.dispatch_component("statusbasic")
+end ?>
<H2>PROGRAM SPECIFIC OPTIONS/INFORMATION</H2>
<DL>
@@ -26,4 +21,3 @@ local tags = { "state", }
displayinfo(myform,tags,"viewonly")
?>
</DL>
-