diff options
author | Ted Trask <ttrask01@yahoo.com> | 2008-07-12 15:27:51 +0000 |
---|---|---|
committer | Ted Trask <ttrask01@yahoo.com> | 2008-07-12 15:27:51 +0000 |
commit | 4522cd8af6efd114b79b48eeddfa9660cfb08716 (patch) | |
tree | 4c35c5d2a3c146c0759f24dafbdb93b491c8eab0 /app/acf-util/roles-viewroles-html.lsp | |
parent | f6baf459cde6258511c94c0e1324d630af675cb5 (diff) | |
download | acf-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.lsp | 18 |
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 ?> -<? --]] ?> |