diff options
Diffstat (limited to 'weblog-status-html.lsp')
-rw-r--r-- | weblog-status-html.lsp | 19 |
1 files changed, 13 insertions, 6 deletions
diff --git a/weblog-status-html.lsp b/weblog-status-html.lsp index d0784ba..fae98c0 100644 --- a/weblog-status-html.lsp +++ b/weblog-status-html.lsp @@ -5,23 +5,30 @@ require("viewfunctions") <% displaycommandresults({"createdatabase"}, session, true) %> <H1>Weblog Database Status</H1> +<DL> <% local status if viewlibrary and viewlibrary.dispatch_component then if session.permissions.postgresql and session.permissions.postgresql.status then status = viewlibrary.dispatch_component("postgresql/postgresql/status", nil, true) end -end -if status then %> -<p>Database is <%= status.value.status.value %> +end %> + +<DT>Database status</DT><DD> +<% if status then %> +<%= status.value.status.value %> <% else %> -<p>Database status unknown +unknown <% end %> +</DD> +<DT>Weblog Database</DT><DD> <% if data.value then %> -<p>Weblog Database present +present <% else %> -<p>Weblog Database missing +missing <% if viewlibrary and viewlibrary.dispatch_component then viewlibrary.dispatch_component("createdatabase") end %> <% end %> +</DD> +</DL> |