Add view for listdatabases action

db-listdatabases-html.lsp

+<% local form, viewlibrary, page_info, session = ... %>
+<% require("htmlviewfunctions") %>
+<% html = require("acf.html") %>
+
+<H1><%= html.html_escape(form.label) %></H1>
+<DL>
+<% if form.errtxt then %><P CLASS='error'><%= string.gsub(html.html_escape(form.errtxt), "\n", "<BR>") %></P><% end %>
+<% for i,database in ipairs(form.value) do %>
+	<li>
+	<% if viewlibrary.check_permission("listtables") then %>
+		<%= html.link{value = "listtables?database=" .. database, label=database} %>
+	<% else %>
+		<%= html.html_escape(database) %>
+	<% end %>
+<% end %>
+<% if #form.value == 0 then %>
+No databases found
+<% end %>
+</DL>