summaryrefslogtreecommitdiffstats
path: root/weblog-status-html.lsp
blob: d0784baf50381940737abc76a22feb7b266348b8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
<% local data, viewlibrary, page_info, session = ... 
require("viewfunctions")
%>

<% displaycommandresults({"createdatabase"}, session, true) %>

<H1>Weblog Database Status</H1>
<% 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 %>
<% else %>
<p>Database status unknown
<% end %>

<% if data.value then %>
<p>Weblog Database present
<% else %>
<p>Weblog Database missing
<% if viewlibrary and viewlibrary.dispatch_component then
	viewlibrary.dispatch_component("createdatabase")
end %>
<% end %>