From 99457fa341d33006c4ff8b2b81196e5de60abb6a Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Thu, 25 Aug 2011 19:59:33 +0000
Subject: Cleaned up use of config files

---
 weblog-listfiles-html.lsp | 39 ++++++++-------------------------------
 1 file changed, 8 insertions(+), 31 deletions(-)

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

diff --git a/weblog-listfiles-html.lsp b/weblog-listfiles-html.lsp
index c2fe301..ba03446 100644
--- a/weblog-listfiles-html.lsp
+++ b/weblog-listfiles-html.lsp
@@ -2,41 +2,18 @@
 require("viewfunctions")
 %>
 
-<% displaycommandresults({"editfile", "deletefile", "startstop"}, session) %>
-<% displaycommandresults({"createfile"}, session, true) %>
-
+<% displaycommandresults({"editfile"}, session) %>
 
 <H1>File List</H1>
 <DL>
 <TABLE>
 	<TR style="background:#eee;font-weight:bold;">
-		<TD style="padding-right:20px;white-space:nowrap;text-align:left;" class="header">Action</TD>
-		<TD style="white-space:nowrap;text-align:left;" class="header">File</TD>
-	</TR>
-<% for i,file in ipairs(view.value) do %>
-	<TR>
-		<TD style="padding-right:20px;white-space:nowrap;">
-		<% if viewlibrary.check_permission("editfile") then %>	
-			<%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/editfile?filename="..file.."&redir="..page_info.orig_action, label="Edit "} %>
-		<% end %>
-		<% if viewlibrary.check_permission("deletefile") then %>	
-			<%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/deletefile?filename="..file, label="Delete "} %>
-		<% end %>
-		</TD>
-		<TD style="white-space:nowrap;"><%= html.html_escape(file) %></TD>
-	</TR>
-<% end %>
+		<TD style="padding-right:20px;white-space:nowrap;text-align:left;" class="header">File</TD>
+		<TD style="padding-right:20px;white-space:nowrap;text-align:left;" class="header">Size</TD>
+		<TD style="white-space:nowrap;text-align:left;" class="header">Last Modified</TD>
+	</TR>		
+	<% for k,v in ipairs( view.value ) do
+		io.write( "<tr><td><a href=\"" .. html.html_escape(page_info.script .. page_info.prefix .. page_info.controller) .. "/editfile?filename=" .. html.html_escape(v.filename) .. "&redir=" .. html.html_escape(page_info.orig_action) .. "\">" .. html.html_escape(v.filename) .. "</a></td><td>" .. html.html_escape(v.size) .."</td><td>" .. html.html_escape(v.mtime) .."</td></tr>\n" )
+	end %>
 </TABLE>
 </DL>
-
-<% if viewlibrary and viewlibrary.dispatch_component and viewlibrary.check_permission("createfile") then
-	local createform = viewlibrary.dispatch_component("createfile", nil, true) %>
-<H2><%= html.html_escape(createform.label) %></H2>
-<%
-	createform.action = page_info.script .. page_info.prefix .. page_info.controller .. "/createfile"
-	displayform(createform)
-end %>
-
-<% if viewlibrary and viewlibrary.dispatch_component and viewlibrary.check_permission("startstop") then
-	viewlibrary.dispatch_component("startstop")
-end %>
-- 
cgit v1.2.3