summaryrefslogtreecommitdiffstats
path: root/squid-digest-html.lsp
blob: 9416679648813ea8b6844f790d03b6bc7caf5fb0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
<% local form, viewlibrary, page_info, session = ... %>
<% htmlviewfunctions = require("htmlviewfunctions") %>
<% html = require("acf.html") %>

<% htmlviewfunctions.displaycommandresults({"enabledigestlist"}, session) %>

<%
local header_level = htmlviewfunctions.displaysectionstart(cfe({label="Digest User List Status"}), page_info)
htmlviewfunctions.displayitem(form.value.status)
if form.value.status.errtxt then
	htmlviewfunctions.displayitem(cfe({type="form", value={}, label="", option="Enable", action="enabledigestlist" }), page_info, 0)
end
htmlviewfunctions.displaysectionend(header_level)
%>

<%
local pattern = string.gsub(page_info.prefix..page_info.controller, "[%(%)%.%%%+%-%*%?%[%]%^%$]", "%%%1")
local func = haserl.loadfile(page_info.viewfile:gsub(pattern..".*$", "/") .. "filedetails-html.lsp")
func(form, viewlibrary, page_info, session)
%>