diff options
author | Ted Trask <ttrask01@yahoo.com> | 2012-08-15 11:07:37 +0000 |
---|---|---|
committer | Ted Trask <ttrask01@yahoo.com> | 2012-08-15 11:07:37 +0000 |
commit | 909e5c2787bf0d3cf06f05b0b395e288bfd5031d (patch) | |
tree | 6156ce64d7969c2c1370279a987070276318348a | |
parent | df5a49ec9e3f8d737a9dd5434414b19b739179af (diff) | |
download | acf-samba-909e5c2787bf0d3cf06f05b0b395e288bfd5031d.tar.bz2 acf-samba-909e5c2787bf0d3cf06f05b0b395e288bfd5031d.tar.xz |
Removed call to redirect_to_referrer
-rw-r--r-- | samba-controller.lua | 2 | ||||
-rw-r--r-- | samba-listshares-html.lsp | 2 | ||||
-rw-r--r-- | samba-model.lua | 19 |
3 files changed, 15 insertions, 8 deletions
diff --git a/samba-controller.lua b/samba-controller.lua index 1af97f6..3450ed5 100644 --- a/samba-controller.lua +++ b/samba-controller.lua @@ -31,7 +31,7 @@ function editshare(self) end function deleteshare(self) - return self:redirect_to_referrer(self.model.delete_share(self.clientdata.name)) + return self.handle_form(self, self.model.get_delete_share, self.model.delete_share, self.clientdata, "Delete", "Delete Share", "Share Deleted") end function createshare(self) diff --git a/samba-listshares-html.lsp b/samba-listshares-html.lsp index e118a70..a3332f7 100644 --- a/samba-listshares-html.lsp +++ b/samba-listshares-html.lsp @@ -21,7 +21,7 @@ require("htmlviewfunctions") <%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/editshare?name="..share.name.."&redir="..page_info.orig_action, label="Edit "} %> <% end %> <% if viewlibrary.check_permission("deleteshare") then %> - <%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/deleteshare?name="..share.name, label="Delete "} %> + <%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/deleteshare?submit=true&name="..share.name, label="Delete "} %> <% end %> </TD> <TD style="padding-right:20px;white-space:nowrap;"><%= html.html_escape(share.name) %></TD> diff --git a/samba-model.lua b/samba-model.lua index 54cd65d..eddbe51 100644 --- a/samba-model.lua +++ b/samba-model.lua @@ -289,11 +289,18 @@ function create_share(self, share) return share end -function delete_share(name) - local retval = cfe({ label="Delete Share result" }) +function get_delete_share(self, clientdata) + local retval = {} + retval.name = cfe({ value=clientdata.name or "", label="Share Name" }) + return cfe({ type="group", value=retval, label="Delete Share" }) +end + +function delete_share(self, delshare) + local name = delshare.value.name.value + delshare.ertxt = "Failed to delete share" if specialsection[name] then - retval.errtxt = "Share not found" + delshare.value.name.errtxt = "Share not found" else configcontent = configcontent or fs.read_file(configfile) or "" config = config or format.parse_ini_file(configcontent) or {} @@ -303,11 +310,11 @@ function delete_share(name) fs.write_file(configfile, configcontent) configcontent = nil config = nil - retval.value = "Share Deleted" + delshare.errtxt = nil else - retval.errtxt = "Share not found" + delshare.value.name.errtxt = "Share not found" end end - return retval + return delshare end |