summaryrefslogtreecommitdiffstats
path: root/app/expert-html.lsp
diff options
context:
space:
mode:
authorTed Trask <ttrask01@yahoo.com>2008-07-02 15:56:04 +0000
committerTed Trask <ttrask01@yahoo.com>2008-07-02 15:56:04 +0000
commit997b4dcd33463841aa8f1ca6d59dea7bc9d38ae9 (patch)
tree31555c8bdf9da14b96e146569b4c5dab3138d6f6 /app/expert-html.lsp
parent9a0afb466ef66b0d27fd12652c3fe198d4fcfe6d (diff)
downloadacf-core-997b4dcd33463841aa8f1ca6d59dea7bc9d38ae9.tar.bz2
acf-core-997b4dcd33463841aa8f1ca6d59dea7bc9d38ae9.tar.xz
Modified core to create model and controller function libraries and some common html views. Moved cfe to a library. Modified redirect_to_referrer function - may break some pages.
git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@1267 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'app/expert-html.lsp')
-rw-r--r--app/expert-html.lsp15
1 files changed, 15 insertions, 0 deletions
diff --git a/app/expert-html.lsp b/app/expert-html.lsp
new file mode 100644
index 0000000..c4a76cd
--- /dev/null
+++ b/app/expert-html.lsp
@@ -0,0 +1,15 @@
+<? local form, viewlibrary, page_info, session = ... ?>
+<? require("viewfunctions") ?>
+
+<? if viewlibrary and viewlibrary.dispatch_component then
+ viewlibrary.dispatch_component("status")
+end ?>
+
+<?
+local func = haserl.loadfile(page_info.viewfile:gsub(page_info.prefix..page_info.controller..".*$", "/") .. "filedetails-html.lsp")
+func(form, viewlibrary, page_info, session)
+?>
+
+<? if viewlibrary and viewlibrary.dispatch_component then
+ viewlibrary.dispatch_component("startstop")
+end ?>