summaryrefslogtreecommitdiffstats
path: root/lbu-html.lsp
diff options
context:
space:
mode:
authorAlexander Poslavsky <alexander.poslavsky@gmail.com>2007-11-02 13:08:51 +0000
committerAlexander Poslavsky <alexander.poslavsky@gmail.com>2007-11-02 13:08:51 +0000
commit1448b0049d94eb830c2e6ac17a6f1038f76de076 (patch)
treeacc7f5090239bd28da98f0bb8fae2c4d48862365 /lbu-html.lsp
downloadacf-alpine-conf-1448b0049d94eb830c2e6ac17a6f1038f76de076.tar.bz2
acf-alpine-conf-1448b0049d94eb830c2e6ac17a6f1038f76de076.tar.xz
lbu acf module work-in-progress
git-svn-id: svn://svn.alpinelinux.org/acf/lbu/trunk@259 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'lbu-html.lsp')
-rw-r--r--lbu-html.lsp41
1 files changed, 41 insertions, 0 deletions
diff --git a/lbu-html.lsp b/lbu-html.lsp
new file mode 100644
index 0000000..efb1c38
--- /dev/null
+++ b/lbu-html.lsp
@@ -0,0 +1,41 @@
+<?
+local form = ...
+?><h1>Edit <?= form.value.name.value
+?></h1><?= html.form.start{
+ method="POST",
+ action= form.option.script .. "/" .. form.option.prefix
+ .. form.option.controller .. "/" .. form.option.action ..
+ form.option.extra
+}
+?><table><?
+local myform = form.value
+local tags = {
+ { "content", "longtext" },
+ { "cmd", "action" },
+ { "id", "hidden" },
+}
+
+for i,v in pairs(tags) do
+ local name = v[1]
+ local val = myform[name]
+ val.type = v[2]
+ ?><tr><td><?
+--[[
+ if val.label then
+ io.write(val.label)
+ elseif val.type ~= "hidden" then
+ io.write(name)
+ end
+--]]
+ ?></td><td><?
+ if val.name == "" then val.name = name end
+ if val.type == "longtext" then
+ val.cols = 80
+ val.rows = 24
+ end
+ ?><?= html.form[val.type](val)
+ ?></td></tr><?
+end
+?></table><?= html.form.stop()
+?>
+