summaryrefslogtreecommitdiffstats
path: root/lbu-html.lsp
blob: efb1c38b9424cb5ff375aa052c0df361c3d452b6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
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()
?>