summaryrefslogtreecommitdiffstats
path: root/app/acf-util/roles-editrole-html.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'app/acf-util/roles-editrole-html.lsp')
-rw-r--r--app/acf-util/roles-editrole-html.lsp67
1 files changed, 0 insertions, 67 deletions
diff --git a/app/acf-util/roles-editrole-html.lsp b/app/acf-util/roles-editrole-html.lsp
deleted file mode 100644
index d464cd1..0000000
--- a/app/acf-util/roles-editrole-html.lsp
+++ /dev/null
@@ -1,67 +0,0 @@
-<% local form, viewtable, page_info = ... %>
-<% require("htmlviewfunctions") %>
-
-<H1><%= html.html_escape(form.label) %></H1>
-<%
- htmlviewfunctions.displayformstart(form, page_info)
- -- If editing existing role, disable role
- if page_info.action ~= "newrole" then
- form.value.role.readonly = true
- end
- htmlviewfunctions.displayformitem(form.value.role, "role")
-
- -- copied this code from viewfunctions so we can disable the default boxes
- local myitem = form.value.permissions
- myitem.name = "permissions"
- io.write("<DT")
- if myitem.errtxt then
- myitem.class = "error"
- io.write(' class="error"')
- end
- io.write(">" .. html.html_escape(myitem.label) .. "</DT>\n")
- io.write("<DD>")
- -- FIXME multiple select doesn't work in haserl, so use series of checkboxes
- myitem.class = nil
- local tempname = myitem.name
- local tempval = myitem.value or {}
- local reversedefault = {}
- for x,val in ipairs(myitem.default or {}) do
- reversedefault[val] = x
- end
- local reverseval = {}
- for x,val in ipairs(tempval) do
- reverseval[val] = x
- end
- local reverseopt = {}
- for x,val in ipairs(myitem.option) do
- reverseopt[val] = x
- myitem.value = val
- myitem.checked = reverseval[val]
- if reversedefault[val] then myitem.disabled = true else myitem.disabled = nil end
- myitem.name = tempname .. "." .. x
- io.write(html.form.checkbox(myitem) .. html.html_escape(val) .. "<br>\n")
- end
- -- Check for values not in options
- if myitem.errtxt then
- myitem.class = "error"
- io.write('<p class="error">\n')
- end
- for x,val in ipairs(tempval) do
- if not reverseopt[val] then
- myitem.value = val
- myitem.checked = true
- io.write(html.form.checkbox(myitem) .. html.html_escape(val) .. "<br>\n")
- end
- end
- if myitem.errtxt then
- io.write('</p>\n')
- end
- myitem.name = tempname
- myitem.value = tempval
-
- if myitem.descr then io.write('<P CLASS="descr">' .. string.gsub(html.html_escape(myitem.descr), "\n", "<BR>") .. "</P>\n") end
- if myitem.errtxt then io.write('<P CLASS="error">' .. string.gsub(html.html_escape(myitem.errtxt), "\n", "<BR>") .. "</P>\n") end
- io.write("</DD>\n")
-
- htmlviewfunctions.displayformend(form)
-%>