From b9fa0863345ea52d8aa8a563b5fc7981f160de6a Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Wed, 22 Oct 2008 18:50:22 +0000
Subject: Modified viewfunctions to split displayform, creating
 displayformstart and displayformend, to provide flexibility while still using
 the library. Also added support for hidden fields - including a common redir
 field. Removed redirectOnSuccess from controllerfunctions handle_form, and
 replaced it with the redir field. Removed redirectOnSuccess from controllers
 that used it and added handlecommandresults and redir entries to links and
 forms throughout many views. This will cause a redirect to the originating
 view when a form is successfully completed. acf_www-controller now includes
 orig_action in page_info to report the original action launched by the user.

git-svn-id: svn://svn.alpinelinux.org/acf/fetchmail/trunk@1560 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 fetchmail-config-html.lsp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'fetchmail-config-html.lsp')

diff --git a/fetchmail-config-html.lsp b/fetchmail-config-html.lsp
index b686400..ac44511 100644
--- a/fetchmail-config-html.lsp
+++ b/fetchmail-config-html.lsp
@@ -1,7 +1,7 @@
 <% local view, viewlibrary, page_info, session = ... %>
 <% require("viewfunctions") %>
 
-<% displaycommandresults({"deleteentry"}, session) %>
+<% displaycommandresults({"editconfig", "editentry", "deleteentry", "createentry"}, session) %>
 
 <% if viewlibrary and viewlibrary.dispatch_component then
 	viewlibrary.dispatch_component("status")
@@ -12,6 +12,7 @@ end %>
 <DL>
 <dt>Edit global settings</dt>
 <dd><form action="<%= page_info.script .. page_info.prefix .. page_info.controller .. "/editconfig" %>" method="POST">
+<input class="hidden" type="hidden"  name="redir"  value="<%= page_info.orig_action %>" >
 <input type=submit value="Edit" class="submit">
 </form></dd>
 </DL>
-- 
cgit v1.2.3