summaryrefslogtreecommitdiffstats
path: root/dansguardian-category-html.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'dansguardian-category-html.lsp')
-rw-r--r--dansguardian-category-html.lsp56
1 files changed, 0 insertions, 56 deletions
diff --git a/dansguardian-category-html.lsp b/dansguardian-category-html.lsp
deleted file mode 100644
index 2f94048..0000000
--- a/dansguardian-category-html.lsp
+++ /dev/null
@@ -1,56 +0,0 @@
-<%
-require("viewfunctions")
- local form, viewlibrary = ...
-%>
-
-<%
---[[ 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 viewlibrary and viewlibrary.dispatch_component then
- viewlibrary.dispatch_component("status")
-end %>
-
-<h1>Modify Categories</h1>
-
-<h2>Category list</h2>
-<form action="" method="POST">
-<dl>
-<%
-local myform = form["service"]["config"]["categories"]
-for k,v in ipairs( myform ) do
- io.write("<DT ")
- if not (v.active) then io.write("CLASS='error'") end
- io.write("><img src='/static/tango/16x16/categories/applications-system.png' height='16' width='16'> "..v.name.."</DT>\n")
- io.write("<DD><TABLE>")
- if (v.option) then
- for k1,v1 in pairs(v.option) do
- io.write("<TR><TD STYLE='font-weight:bold;border:none;' WIDTH='180px' ")
- if not (v1.active) then io.write("CLASS='error'") end
- io.write(">".. v1.name .. "</TD><TD STYLE='border:none;'>[ <A HREF='editcategories?category=".. v.name .. "&object=".. v1.name .. "'>Edit</A> ]</TD></TD>" )
--- for k2,v2 in pairs(v1) do
- --io.write(html.form(v1.type(v1)))
--- io.write("<TD STYLE='border:none;'>")
--- io.write("[ " ..html.link(v2) .. " ] ")
--- io.write(tostring(v2))
--- io.write("</TD>")
--- end
- io.write("</TR>\n")
- end
- io.write("<TR><TD STYLE='font-weight:bold;border:none;' WIDTH='180px'><INPUT TYPE='text' CLASS='text'></TD><TD STYLE='border:none;'><INPUT TYPE='submit' CLASS='submit' VALUE='Create' disabled></TD></TD></TR>\n" )
- end
- io.write("</TABLE></DD>")
---io.write( "<BR><input type=\"checkbox\" name=\"cats\" value=\"" .. v .. "\"> " .. v .. "\n" )
-end
-%>
-</dl>
-</form>
-
-
-<% if viewlibrary and viewlibrary.dispatch_component then
- viewlibrary.dispatch_component("startstop")
-end %>