diff options
| author | Ted Trask <ttrask01@yahoo.com> | 2008-04-30 20:36:02 +0000 |
|---|---|---|
| committer | Ted Trask <ttrask01@yahoo.com> | 2008-04-30 20:36:02 +0000 |
| commit | 378e53f20a0f11c36afffbaef78f47a5303df9ce (patch) | |
| tree | a39e3c216dc10f919ef272c53b67a8f01f001be0 /app/acf-util/logon-html.lsp | |
| parent | 82fd96bdcc5b721d8fc208fe4edba54f4dc6fdb7 (diff) | |
| download | acf-core-378e53f20a0f11c36afffbaef78f47a5303df9ce.tar.bz2 acf-core-378e53f20a0f11c36afffbaef78f47a5303df9ce.tar.xz | |
Modified cfe, removing option, errtxt, and name, and adding label - This may break things.
Rewrote password module, adding model
Modified authenticator to make password module work
git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@1052 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'app/acf-util/logon-html.lsp')
| -rw-r--r-- | app/acf-util/logon-html.lsp | 21 |
1 files changed, 10 insertions, 11 deletions
diff --git a/app/acf-util/logon-html.lsp b/app/acf-util/logon-html.lsp index 20aa0ee..f503a9b 100644 --- a/app/acf-util/logon-html.lsp +++ b/app/acf-util/logon-html.lsp @@ -1,20 +1,19 @@ <? local form = ... ?> +<? require("viewfunctions") ?> <? --[[ io.write(html.cfe_unpack(form)) --]] ?> -<? if form.errtxt ~= "" then ?> +<? if form.errtxt then ?> <h1>Command Result</h1> <p class='error'> <?= form.errtxt ?></p> <? end ?> -<h1>Logon</h1> -<form action="logon" method="POST"> -<DL> - <DT>User id</DT> - <DD><input class="text" type="text" name="userid" value="<?= form.value ?>"></DD> - <DT>Password</DT> - <DD><input class="password" type="password" name="password" value=""></DD> - <DT><input class="submit" type="submit" name="Logon" value="Logon"></DD> -</DL> -</form> +<h1><?= form.label ?></h1> +<? + form.action = "logon" + form.submit = "Logon" + form.value.password.type = "password" + local order = { "userid", "password" } + displayform(form, order) +?> |