summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--app/acf-util/roles-editrole-html.lsp2
-rw-r--r--app/acf-util/roles-html.lsp6
2 files changed, 5 insertions, 3 deletions
diff --git a/app/acf-util/roles-editrole-html.lsp b/app/acf-util/roles-editrole-html.lsp
index f243ecb..cec9af0 100644
--- a/app/acf-util/roles-editrole-html.lsp
+++ b/app/acf-util/roles-editrole-html.lsp
@@ -12,7 +12,6 @@
if page_info.action ~= "newrole" then
form.value.role.readonly = true
end
- io.write("<DL>\n")
displayformitem(form.value.role, "role")
-- copied this code from viewfunctions so we can disable the default boxes
@@ -68,6 +67,5 @@
if myitem.errtxt then io.write('<P CLASS="error">' .. string.gsub(html.html_escape(myitem.errtxt), "\n", "<BR>") .. "</P>\n") end
io.write("</DD>\n")
- io.write("</DL>\n")
displayformend(form)
%>
diff --git a/app/acf-util/roles-html.lsp b/app/acf-util/roles-html.lsp
index 41ebcc3..090421f 100644
--- a/app/acf-util/roles-html.lsp
+++ b/app/acf-util/roles-html.lsp
@@ -14,9 +14,11 @@
<% if view.value.roles then %>
<H2><%= html.html_escape(view.value.userid.value) %> is valid in these roles</H2>
+ <DL>
<% for a,b in pairs(view.value.roles.value) do
- print("<li>",html.html_escape(b),"</li>")
+ print("<dt>",html.html_escape(b),"</dt><dd>&nbsp;</dd>")
end %>
+ </DL>
<% end %>
<% --]] %>
@@ -27,6 +29,7 @@
<% elseif view.value.role then %>
<H2><%= html.html_escape(view.value.role.value) %>'s full permissions are</H2>
<% end %>
+ <DL>
<% local controllers = {}
-- It's nice to have it in alphabetical order
for cont in pairs(view.value.permissions.value) do
@@ -50,5 +53,6 @@
end
io.write("</TABLE>")
%>
+ </DL>
<% end %>
<% --]] %>