From 290d71b1b8bba45be46087a78bdcbdd516199985 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Fri, 29 May 2009 11:47:59 +0200
Subject: initial commit

based on weblog.tar.gz ncopa got by email.
---
 weblog-viewactivitylog-html.lsp | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 weblog-viewactivitylog-html.lsp

(limited to 'weblog-viewactivitylog-html.lsp')

diff --git a/weblog-viewactivitylog-html.lsp b/weblog-viewactivitylog-html.lsp
new file mode 100644
index 0000000..9aa681e
--- /dev/null
+++ b/weblog-viewactivitylog-html.lsp
@@ -0,0 +1,22 @@
+<% local data, viewlibrary, page_info, session = ... %>
+<H1><%= html.html_escape(data.label) %></H1>
+<TABLE>
+	<TR style="background:#eee;font-weight:bold;">
+		<TD style="padding-right:20px;white-space:nowrap;" class="header">Date</TD>
+		<TD style="white-space:nowrap;" WIDTH="90%" class="header">Message</TD>
+	</TR>
+
+<% for i,log in ipairs(data.value) do %>
+	<TR>
+		<TD><%= html.html_escape(log.logdatetime) %></TD>
+		<TD><%= html.html_escape(log.msgtext) %></TD>
+	</TR>
+<% end %>
+</TABLE>
+
+<% if data.errtxt then %>
+<p class='error'><%= html.html_escape(data.errtxt) %></p>
+<% end %>
+<% if #data.value == 0 then %>
+<p>No history found</p>
+<% end %>
-- 
cgit v1.2.3