From 80b754148dd765622006cc602218c88307e42043 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 7 Jul 2008 19:16:11 +0000
Subject: Update openssl to use controllerfunctions and modelfunctions.

git-svn-id: svn://svn.alpinelinux.org/acf/openssl/trunk@1287 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 openssl-checkenvironment-html.lsp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'openssl-checkenvironment-html.lsp')

diff --git a/openssl-checkenvironment-html.lsp b/openssl-checkenvironment-html.lsp
index 3775402..9b8848c 100644
--- a/openssl-checkenvironment-html.lsp
+++ b/openssl-checkenvironment-html.lsp
@@ -1,4 +1,4 @@
-<? local form, viewlibrary = ... ?>
+<? local form, viewlibrary, page_info = ... ?>
 <? require("viewfunctions") ?>
 
 <? --[[ DEBUG INFORMATION
@@ -9,7 +9,7 @@ io.write(html.cfe_unpack(form))
 <DL>
 <? displayitem(form.value.status) ?>
 <? if form.value.status.errtxt then ?>
-<form action="checkenvironment" method="POST">
-<DT><input class="submit" type="submit" name="<?= form.option ?>" value="<?= form.option ?>"></DT>
+<form action="<?= page_info.script .. page_info.prefix .. page_info.controller .. "/" .. page_info.action ?>" method="POST">
+<DT></DT><DD><input class="submit" type="submit" name="<?= form.option ?>" value="<?= form.option ?>"></DD>
 <? end ?>
 </DL>
-- 
cgit v1.2.3