summaryrefslogtreecommitdiffstats
path: root/fetchmail-config-html.lsp
diff options
context:
space:
mode:
authorTed Trask <ttrask01@yahoo.com>2014-04-10 06:21:29 +0000
committerTed Trask <ttrask01@yahoo.com>2014-04-10 06:21:29 +0000
commit77a0025e476071c0016383328cce59259c7fbacb (patch)
tree6ef05e8a6ab75596b042aa492abd364a21a7fe65 /fetchmail-config-html.lsp
parent593eb28947e4aa7060d1570d43271d83e589fab3 (diff)
downloadacf-fetchmail-77a0025e476071c0016383328cce59259c7fbacb.tar.bz2
acf-fetchmail-77a0025e476071c0016383328cce59259c7fbacb.tar.xz
Changes to use new htmlviewfunctions functions
Diffstat (limited to 'fetchmail-config-html.lsp')
-rw-r--r--fetchmail-config-html.lsp14
1 files changed, 6 insertions, 8 deletions
diff --git a/fetchmail-config-html.lsp b/fetchmail-config-html.lsp
index d23df93..87cab3c 100644
--- a/fetchmail-config-html.lsp
+++ b/fetchmail-config-html.lsp
@@ -8,14 +8,12 @@
viewlibrary.dispatch_component("status")
end %>
-<h1>Global Settings</h1>
-<div class='item'><p class='left'>Edit global settings</p>
-<div class='right'>
-<form action="<%= html.html_escape(page_info.script .. page_info.prefix .. page_info.controller .. "/editconfig") %>" method="post">
-<input class="hidden" type="hidden" name="redir" value="<%= html.html_escape(page_info.orig_action) %>" >
-<input type=submit value="Edit" class="submit">
-</form>
-</div></div><!-- end .item -->
+<%
+local redir = cfe({ type="hidden", value=page_info.orig_action })
+local header_level = htmlviewfunctions.displaysectionstart(cfe({ label="Global Settings" }), page_info)
+htmlviewfunctions.displayitem(cfe({type="link", value={redir=redir}, label="Edit global settings", option="Edit", action="editconfig"}), page_info, 0)
+htmlviewfunctions.displaysectionend(header_level)
+%>
<% if viewlibrary and viewlibrary.dispatch_component then
viewlibrary.dispatch_component("listentries")