From 1e24bc095c1ae8b00740892c2a3cd869b81281ca Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 4 Jul 2011 13:07:48 +0000
Subject: Added new dumpdatabase action to dump database without ids - helps
 compare databases

---
 provisioning-dumpdatabase-html.lsp | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 provisioning-dumpdatabase-html.lsp

(limited to 'provisioning-dumpdatabase-html.lsp')

diff --git a/provisioning-dumpdatabase-html.lsp b/provisioning-dumpdatabase-html.lsp
new file mode 100644
index 0000000..55001f4
--- /dev/null
+++ b/provisioning-dumpdatabase-html.lsp
@@ -0,0 +1,18 @@
+<% local form, viewlibrary, page_info = ... 
+require("viewfunctions")
+%>
+
+<% if form.value.data then %>
+<H1><%= html.html_escape(form.value.data.label) %></H1>
+<DL>
+<textarea name="filecontent">
+<%= html.html_escape(form.value.data.value) %>
+</textarea>
+</DL>
+<% end %>
+
+<H1><%= html.html_escape(form.label) %></H1>
+<%
+	form.value.data = nil
+	displayform(form, nil, nil, page_info, 2)
+%>
-- 
cgit v1.2.3