diff options
| author | Ted Trask <ttrask01@yahoo.com> | 2008-07-05 13:19:26 +0000 |
|---|---|---|
| committer | Ted Trask <ttrask01@yahoo.com> | 2008-07-05 13:19:26 +0000 |
| commit | dba7285654a0e2b918c203c200bc0ebd75482f59 (patch) | |
| tree | 3e903dd228ce54de4f94933420702f4c53a8f175 /dnscache-expert-html.lsp | |
| parent | 49a7dc03a16343f7c4abfba998866a8a6abffae7 (diff) | |
| download | acf-dnscache-dba7285654a0e2b918c203c200bc0ebd75482f59.tar.bz2 acf-dnscache-dba7285654a0e2b918c203c200bc0ebd75482f59.tar.xz | |
Modified dnscache to use controllerfunctions, modelfunctions, and common lsp files.
git-svn-id: svn://svn.alpinelinux.org/acf/dnscache/trunk@1282 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'dnscache-expert-html.lsp')
| l---------[-rw-r--r--] | dnscache-expert-html.lsp | 51 |
1 files changed, 1 insertions, 50 deletions
diff --git a/dnscache-expert-html.lsp b/dnscache-expert-html.lsp index c4ad955..207f324 100644..120000 --- a/dnscache-expert-html.lsp +++ b/dnscache-expert-html.lsp @@ -1,50 +1 @@ -<? local form, viewlibrary = ... ?> -<? require("viewfunctions") ?> -<? ---[[ DEBUG INFORMATION -io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>") -io.write(html.cfe_unpack(form)) -io.write("</span>") ---]] -?> - -<? ---[[ ?> -<? if viewlibrary and viewlibrary.dispatch_component then - viewlibrary.dispatch_component("status") -end ?> -<? --]] ?> - -<H1>Configuration</H1> -<H2>Expert Configuration</H2> -<H3>File Details</H3> -<DL> -<? -displayitem(form.value.filename) -displayitem(form.value.filesize) -displayitem(form.value.mtime) -?> -</DL> - -<H3>File Content</H3> -<? if form.descr then ?><P CLASS='descr'><?= string.gsub(form.descr, "\n", "<BR>") ?></P><? end ?> -<? if form.errtxt then ?><P CLASS='error'><?= string.gsub(form.errtxt, "\n", "<BR>") ?></P><? end ?> -<form action="" method="POST"> -<textarea name="filecontent"> -<?= form.value.filecontent.value ?> -</textarea> -<? if form.value.filecontent.errtxt then ?><P CLASS='error'><?= string.gsub(form.value.filecontent.errtxt, "\n", "<BR>") ?></P><? end ?> - -<DL><DT></DT><DD><input class="submit" type="submit" name="<?= form.option ?>" value="Save"></DD></DL> -</form> - -<? if viewlibrary and viewlibrary.dispatch_component then - viewlibrary.dispatch_component("startstop") -end ?> - -<? ---[[ DEBUG INFORMATION -io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>") -io.write(html.cfe_unpack(form)) -io.write("</span>") ---]] -?> +../expert-html.lsp
\ No newline at end of file |