summaryrefslogtreecommitdiffstats
path: root/app/acf-util/logon-html.lsp
diff options
context:
space:
mode:
authorNatanael Copa <natanael.copa@gmail.com>2007-07-27 12:53:38 +0000
committerNatanael Copa <natanael.copa@gmail.com>2007-07-27 12:53:38 +0000
commitdc53423183a0c459284ebd139022b707f01af006 (patch)
tree8a67a2904ec991028bddd429d57eec114b05baab /app/acf-util/logon-html.lsp
parent275c80281ba2e84b8d810bdb1c2b7f8c9a4333d9 (diff)
downloadacf-core-2.0_alpha1.tar.bz2
acf-core-2.0_alpha1.tar.xz
moved core files to new dir structurev2.0_alpha1
git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@219 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'app/acf-util/logon-html.lsp')
-rw-r--r--app/acf-util/logon-html.lsp19
1 files changed, 19 insertions, 0 deletions
diff --git a/app/acf-util/logon-html.lsp b/app/acf-util/logon-html.lsp
new file mode 100644
index 0000000..cdac2bf
--- /dev/null
+++ b/app/acf-util/logon-html.lsp
@@ -0,0 +1,19 @@
+<? local form = ... ?>
+<h1>Logon</h1>
+
+<form action="<?= form.option.script .. form.option.prefix ..
+ form.option.controller .. "/" .. form.option.action ?>" method="POST">
+<table>
+<? local myform = form.value
+ for k,v in pairs(myform) do ?>
+<tr><td><?= v.name ?></td><td>
+<? if v.type == "submit" then ?>
+ <input type="submit" name="<?= v.name ?>" value="Logon">
+<? else ?>
+ <input type="text" name="<?= v.name ?>">
+ <font color=red><?= v.errtxt ?></font>
+<? end ?>
+</td></tr>
+<? end ?>
+</table>
+</form>