diff options
Diffstat (limited to 'weblog-createsource-html.lsp')
| -rw-r--r--[l---------] | weblog-createsource-html.lsp | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/weblog-createsource-html.lsp b/weblog-createsource-html.lsp index d076f78..c15e30e 120000..100644 --- a/weblog-createsource-html.lsp +++ b/weblog-createsource-html.lsp @@ -1 +1,14 @@ -weblog-editsource-html.lsp
\ No newline at end of file +<% local form, viewlibrary, page_info = ... +require("viewfunctions") +%> + +<H1><%= html.html_escape(form.label) %></H1> +<% + form.action = page_info.script .. page_info.prefix .. page_info.controller .. "/" .. page_info.action + form.value.passwd.type = "password" + if page_info.action == "editsource" then + form.value.sourcename.readonly = true + end + local order = {"sourcename", "enabled", "source", "method", "userid", "passwd"} + displayform(form, order) +%> |