summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--weblog-model.lua22
1 files changed, 13 insertions, 9 deletions
diff --git a/weblog-model.lua b/weblog-model.lua
index 01c6ae7..dd07f83 100644
--- a/weblog-model.lua
+++ b/weblog-model.lua
@@ -1205,10 +1205,10 @@ function editselected(data)
databaseconnect(DatabaseOwner)
con:execute("START TRANSACTION")
for i,sel in ipairs(data.value.select.value) do
- con:execute("UPDATE pubweblog SET selected = true WHERE id = '"..escape(sel).."'")
+ assert (con:execute("UPDATE pubweblog SET selected = true WHERE id = '"..escape(sel).."'"))
end
for i,sel in ipairs(data.value.deselect.value) do
- con:execute("UPDATE pubweblog SET selected = false WHERE id = '"..escape(sel).."'")
+ assert (con:execute("UPDATE pubweblog SET selected = false WHERE id = '"..escape(sel).."'"))
end
con:execute("COMMIT")
databasedisconnect()
@@ -1220,13 +1220,17 @@ function editselected(data)
end
function clearselected()
- local retval = cfe({ label="Clear selected records", errtxt = "Failed to clear selected records - who knows why" })
- sql = "UPDATE pubweblog SET selected = false WHERE selected = true"
- databaseconnect(DatabaseOwner)
- assert (con:execute(sql))
- databasedisconnect()
- retval.value = "Cleared"
- retval.errtxt = nil
+ local retval = cfe({ label="Clear selected records" })
+ local res, err = pcall(function()
+ sql = "UPDATE pubweblog SET selected = false WHERE selected = true"
+ databaseconnect(DatabaseOwner)
+ assert (con:execute(sql))
+ databasedisconnect()
+ retval.value = "Cleared"
+ end)
+ if not res then
+ retval.errtxt = err
+ end
return retval
end