summaryrefslogtreecommitdiffstats
path: root/lbu-html.lsp
diff options
context:
space:
mode:
authorTed Trask <ttrask01@yahoo.com>2008-06-05 14:08:41 +0000
committerTed Trask <ttrask01@yahoo.com>2008-06-05 14:08:41 +0000
commiteacd8336300db4822873205f602f63d2f86235af (patch)
tree385751e3a9f74b351fa9787122458daf5d969f4e /lbu-html.lsp
parentab9e94b01060564436b9ba4eef0a2ab1465e7b83 (diff)
downloadacf-alpine-conf-eacd8336300db4822873205f602f63d2f86235af.tar.bz2
acf-alpine-conf-eacd8336300db4822873205f602f63d2f86235af.tar.xz
Updated lbu to use new cfe model and components
git-svn-id: svn://svn.alpinelinux.org/acf/alpine-conf/trunk@1198 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'lbu-html.lsp')
-rw-r--r--lbu-html.lsp16
1 files changed, 16 insertions, 0 deletions
diff --git a/lbu-html.lsp b/lbu-html.lsp
new file mode 100644
index 0000000..71269f5
--- /dev/null
+++ b/lbu-html.lsp
@@ -0,0 +1,16 @@
+<? local form, viewlibrary, pageinfo = ...
+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>")
+--]]
+?>
+
+<H1><?= form.label ?></H1>
+<?
+ form.action = pageinfo.action
+ displayform(form)
+?>