summaryrefslogtreecommitdiffstats
path: root/app/acf-util/roles-viewroles-html.lsp
diff options
context:
space:
mode:
authorTed Trask <ttrask01@yahoo.com>2008-07-12 15:27:51 +0000
committerTed Trask <ttrask01@yahoo.com>2008-07-12 15:27:51 +0000
commit4522cd8af6efd114b79b48eeddfa9660cfb08716 (patch)
tree4c35c5d2a3c146c0759f24dafbdb93b491c8eab0 /app/acf-util/roles-viewroles-html.lsp
parentf6baf459cde6258511c94c0e1324d630af675cb5 (diff)
downloadacf-core-4522cd8af6efd114b79b48eeddfa9660cfb08716.tar.bz2
acf-core-4522cd8af6efd114b79b48eeddfa9660cfb08716.tar.xz
Modifed roles to use controllerfunctions, modelfunctions, and a symlink.
git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@1298 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'app/acf-util/roles-viewroles-html.lsp')
-rw-r--r--app/acf-util/roles-viewroles-html.lsp18
1 files changed, 7 insertions, 11 deletions
diff --git a/app/acf-util/roles-viewroles-html.lsp b/app/acf-util/roles-viewroles-html.lsp
index a98f5b9..23e7195 100644
--- a/app/acf-util/roles-viewroles-html.lsp
+++ b/app/acf-util/roles-viewroles-html.lsp
@@ -1,19 +1,16 @@
-<? local view= ... ?>
+<? local view, viewlibrary, page_info, session= ... ?>
+<? require("viewfunctions") ?>
+
<? --[[
io.write(html.cfe_unpack(view))
--]] ?>
-<? ---[[ ?>
-<H1>ROLES</H1>
-
-<? if view.value.cmdresult then ?>
-<H2>Command Result</H2>
-<dl><?= view.value.cmdresult.value ?></dl>
-<? end ?>
+<? displaycommandresults({"deleterole"}, session) ?>
+<H1>Roles</H1>
<H2>Create new role</H2>
-<form action="newrole" method="POST">
-<dl><dt><input class="submit" type="submit" value="New Role"></dt></dl>
+<form action="<?= page_info.script .. page_info.prefix .. page_info.controller ?>/newrole" method="POST">
+<dl><dt></dt><dd><input class="submit" type="submit" value="New Role"></dd></dl>
</form>
<H2>Existing roles</H2>
@@ -40,4 +37,3 @@
<? end ?>
</dl>
<? end ?>
-<? --]] ?>