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

<H1><%= html.html_escape(form.label) %></H1>
<%
	form.action = page_info.script .. page_info.prefix .. page_info.controller .. "/" .. page_info.action
	if page_info.action == "editentry" then
		form.value.remotehost.readonly = true
		form.value.method.type = "text"
		form.value.method.readonly = true
		form.value.remotemailbox.readonly = true
		form.value.localdomain.readonly = true
	end
	local order = { "remotehost", "enabled", "method", "remotemailbox", "remotepassword", "ssl", "localhost", "localmailbox", "localdomain", "envelope" }
	htmlviewfunctions.displayform(form, order)
%>