summaryrefslogtreecommitdiffstats
path: root/shorewall-html.lsp
diff options
context:
space:
mode:
authorMika Havela <mika.havela@gmail.com>2008-03-05 16:05:29 +0000
committerMika Havela <mika.havela@gmail.com>2008-03-05 16:05:29 +0000
commit04d24d79929167c44875b3291849293b359ee480 (patch)
tree7944a49e3b5309e0d42262824c8e31f7913e5a79 /shorewall-html.lsp
parent1e43af128e100168a0214dde757b7c5ccb21e7f6 (diff)
downloadacf-shorewall-04d24d79929167c44875b3291849293b359ee480.tar.bz2
acf-shorewall-04d24d79929167c44875b3291849293b359ee480.tar.xz
Saving work for today. Editing a record still doesn't work... but we are getting there.
git-svn-id: svn://svn.alpinelinux.org/acf/shorewall/trunk@822 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'shorewall-html.lsp')
-rw-r--r--shorewall-html.lsp16
1 files changed, 13 insertions, 3 deletions
diff --git a/shorewall-html.lsp b/shorewall-html.lsp
index 878e7ac..1672808 100644
--- a/shorewall-html.lsp
+++ b/shorewall-html.lsp
@@ -43,7 +43,8 @@ end
<?
function displayinfo_special(myform)
- for k,v in pairs(myform) do
+ for i=1,#myform do
+ local v = myform[i]
if (v) and (v["value"]) then
io.write("\n\t<DT")
if (#v.errtxt > 0) then
@@ -61,6 +62,7 @@ function displayinfo_special(myform)
end
?>
+<form name="cmd" action="<?= form.option.link ?>/<?= form.option.action ?>" method="POST">
<H1>EDIT PROPERTIES</H1>
<DL>
@@ -70,16 +72,24 @@ displayinfo_special(myform)
?>
<?
-
local tags = {"cmdsave", "cmddelete", }
local myform = form
displayinfo(myform,tags)
?>
+<? -- Add the field that holds the filename
+local myform = form.edit.file
+if (type(myform) == "table") then
+ io.write(html.form[myform.type](myform))
+end
+?>
+
</DL>
+</form>
+
<?
---[[ DEBUG INFORMATION
+---[[ 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>")