diff options
-rw-r--r-- | lbu-commit-html.lsp | 7 | ||||
-rw-r--r-- | lbu-html.lsp | 42 | ||||
-rw-r--r-- | lbu-read-html.lsp | 12 |
3 files changed, 24 insertions, 37 deletions
diff --git a/lbu-commit-html.lsp b/lbu-commit-html.lsp index 3ea0815..1efc362 100644 --- a/lbu-commit-html.lsp +++ b/lbu-commit-html.lsp @@ -13,13 +13,17 @@ end ?> <h1><?= view.title?></h1> - +<? if (table.maxn(view.data) > 0) then ?> + <h2>List</h2> +<? end ?> <? for i,item in ipairs(view.note or {}) do ?> <p class='error'><?= item.content ?></p> <? end ?> <? for i,item in ipairs(view.data) do ?> <dt><?= item.name ?></dt><dd><?= item.status ?></dd> <? end ?> + +<h2>Functions</h2> <dt>Save these changes</dt> <dd><?= html.form.start { method="POST", @@ -37,4 +41,3 @@ end <pre><?= item.content ?></pre> <? end ?> <? -- vim: set filetype=lua : ?> - diff --git a/lbu-html.lsp b/lbu-html.lsp index efb1c38..4ca2cbe 100644 --- a/lbu-html.lsp +++ b/lbu-html.lsp @@ -1,13 +1,13 @@ -<? -local form = ... -?><h1>Edit <?= form.value.name.value -?></h1><?= html.form.start{ +<? 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><? + form.option.extra } ?> + +<? local myform = form.value local tags = { { "content", "longtext" }, @@ -16,26 +16,12 @@ local tags = { } 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() + local name = v[1] + local val = myform[name] + val.type = v[2] + if val.name == "" then val.name = name end ?> +<?= html.form[val.type](val)?> +<? end ?> +<?= html.form.stop() ?> diff --git a/lbu-read-html.lsp b/lbu-read-html.lsp index e44d97a..bfd986a 100644 --- a/lbu-read-html.lsp +++ b/lbu-read-html.lsp @@ -13,15 +13,13 @@ value = view.script .. view.prefix .. view.controller .. "/" .. view.action .. "?id=" .. tostring(item.id), label=item.name - } ?> - </DD> + } ?></DD> <? end ?> <h2>Functions</h2> - <DT>Commit changes</DT> - <DD><?= html.link{ - value = view.script .. view.prefix .. view.controller .. "/commit", - label="commit" } ?> - </DD> +<DT>Commit changes</DT> +<DD><?= html.link{ + value = view.script .. view.prefix .. view.controller .. "/commit", + label="commit" } ?></DD> <? -- vim: set filetype=lua : ?> |