diff options
| author | Ted Trask <ttrask01@yahoo.com> | 2009-05-29 11:47:59 +0200 |
|---|---|---|
| committer | Natanael Copa <natanael.copa@gmail.com> | 2009-05-29 11:47:59 +0200 |
| commit | 290d71b1b8bba45be46087a78bdcbdd516199985 (patch) | |
| tree | e7ab2c3916dc535e4db16dacbf1706ed71ac4977 /weblog-editsource-html.lsp | |
| download | acf-weblog-290d71b1b8bba45be46087a78bdcbdd516199985.tar.bz2 acf-weblog-290d71b1b8bba45be46087a78bdcbdd516199985.tar.xz | |
initial commitv0.1.0
based on weblog.tar.gz ncopa got by email.
Diffstat (limited to 'weblog-editsource-html.lsp')
| -rw-r--r-- | weblog-editsource-html.lsp | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/weblog-editsource-html.lsp b/weblog-editsource-html.lsp new file mode 100644 index 0000000..c05a556 --- /dev/null +++ b/weblog-editsource-html.lsp @@ -0,0 +1,13 @@ +<% 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 + if page_info.action == "editsource" then + form.value.sourcename.readonly = true + end + local order = {"sourcename", "enabled", "source", "method", "userid", "passwd"} + displayform(form, order) +%> |