summaryrefslogtreecommitdiffstats
path: root/app/acf-util/roles-viewroles-html.lsp
diff options
context:
space:
mode:
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 ?>
-<? --]] ?>