summaryrefslogtreecommitdiffstats
path: root/openvpn-read-html.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'openvpn-read-html.lsp')
-rw-r--r--openvpn-read-html.lsp44
1 files changed, 5 insertions, 39 deletions
diff --git a/openvpn-read-html.lsp b/openvpn-read-html.lsp
index 75215ef..c75f4c7 100644
--- a/openvpn-read-html.lsp
+++ b/openvpn-read-html.lsp
@@ -4,45 +4,13 @@
<body>
<h1>Welcome</h1>
-
-<? --[[ DEBUG INFORMATION...?>
-<span style='color:#D2691E;font-family:courier;'>------------ START DEBUG INFORMATION ------------
-<h3>THIS VIEW CONTAINS THE FOLLOWING VARIABLES/TABLES</h2>
-<?
---print ("<span style='color:darkblue;font-family:courier;'>")
-for a,b in pairs(view) do
- if not (type(b) == "table") then
- print ("<b>" .. a .. "</b>: ><span2 style='color:black'>" .. b .. "</span2><<BR>")
- else
- print ("<b>" .. a .. "</b>:...<BR>")
- for c,d in pairs(view[a]) do
- if not (type(d) == "table") then
- print ("<b> { " .. c .. "</b>: ><span2 style='color:black'>" .. d .. "</span2>< <B> }</B><BR>")
- else
- print ("<b> { " .. c .. "</b>:...<BR>")
- for e,f in pairs(view[a][c]) do
- if not (type(f) == "table") then
- print ("<b> { { " .. e .. "</b>: ><span2 style='color:black'>" .. f .. "</span2>< <B> } }</B><BR>")
- else
- print ("<b> { { " .. e .. "</b>:... (table is not visible at the moment)<BR>")
- end
- end
- end
- end
- end
-a,b,c,d,e,f,g,h,i,j = nil,nil,nil,nil,nil,nil,nil,nil,nil,nil
-end
-print ("------------ END DEBUG INFORMATION ------------</span>")
-?>
-<? --]] ?>
-
<h2>Available configs</h2>
-<TABLE BORDER=0 WIDTH="100%">
+<TABLE>
<TR style="background:#eee;font-weight:bold;vertical-align:top;">
- <TD WIDTH=140>Config</TD>
- <TD WIDTH=70>Type</TD>
- <TD WIDTH=70>Status</TD>
- <TD WIDTH=140>Connected Clients</TD>
+ <TD>Config</TD>
+ <TD>Type</TD>
+ <TD>Status</TD>
+ <TD>Connected<BR>Clients</TD>
<TD>Notes</TD>
</TR>
@@ -62,7 +30,5 @@ print ("------------ END DEBUG INFORMATION ------------</span>")
<dt>Program version</dt>
<dd><?= view.version ?></dd>
-
-
</body>
</html>