1 files changed, 14 insertions, 8 deletions
diff --git a/app/shorewall-read-html.lsp b/app/shorewall-read-html.lsp
index cf73662..c4732a0 100644
--- a/app/shorewall-read-html.lsp
+++ b/app/shorewall-read-html.lsp
@@ -1,18 +1,24 @@
-<?
-local view = ...
-?><h1>Edit</h1><table border=0><?
-local sct=""
+<? local view = ... ?>
+
+<? --Status Block
+
+?>
+
+<h1>Edit</h1>
+<table border=0>
+<? local sct=""
 for i,item in ipairs(view.list) do
     if item.section ~= sct then
-        ?><tr><td colspan='2'><h2><?= item.section ?></td></tr><?
+        ?><tr><td colspan='3'><h2><?= item.section ?></td></tr><?
         sct = item.section
     end
-    ?><tr><td><?= html.link{
+    ?><tr><td><?= item.status or '' ?><?
+    ?><td><?= html.link{
         value = view.script .. view.prefix .. view.controller .. "/"
         .. view.action .. "?id=" .. tostring(item.id),
         label=item.name
     }
     ?></td><td><?= item.descr
     ?></td></tr><? 
-end
-?></table>
+end ?>
+</table>