diff options
Diffstat (limited to 'lib/viewfunctions.lua')
| -rw-r--r-- | lib/viewfunctions.lua | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lib/viewfunctions.lua b/lib/viewfunctions.lua index 62a87c6..19911a0 100644 --- a/lib/viewfunctions.lua +++ b/lib/viewfunctions.lua @@ -116,18 +116,36 @@ function displayformitem(myitem, name, viewtype) -- FIXME multiple select doesn't work in haserl, so use series of checkboxes --myitem.type = "select" --myitem.multiple = "true" + myitem.class = nil local tempname = myitem.name local tempval = myitem.value or {} local reverseval = {} for x,val in ipairs(tempval) do reverseval[val] = x end + local reverseopt = {} for x,val in ipairs(myitem.option) do + reverseopt[val] = x myitem.value = val myitem.checked = reverseval[val] myitem.name = tempname .. "." .. x io.write(html.form.checkbox(myitem) .. val .. "<br>\n") end + -- Check for values not in options + if myitem.errtxt then + myitem.class = "error" + io.write('<p class="error">\n') + end + for x,val in ipairs(tempval) do + if not reverseopt[val] then + myitem.value = val + myitem.checked = true + io.write(html.form.checkbox(myitem) .. val .. "<br>\n") + end + end + if myitem.errtxt then + io.write('</p>\n') + end myitem.name = tempname myitem.value = tempval elseif myitem.type == "boolean" then |