From 0fdb99dbc860a6f106eb09074adcb78b670c08c3 Mon Sep 17 00:00:00 2001
From: Mika Havela <mika.havela@gmail.com>
Date: Thu, 10 Jan 2008 13:00:07 +0000
Subject: Current status is now displayed. Apply settings doesn't work!

git-svn-id: svn://svn.alpinelinux.org/acf/alpine-baselayout/trunk@528 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 syslog-expert-html.lsp | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

(limited to 'syslog-expert-html.lsp')

diff --git a/syslog-expert-html.lsp b/syslog-expert-html.lsp
index 9d74227..5f5d6ec 100644
--- a/syslog-expert-html.lsp
+++ b/syslog-expert-html.lsp
@@ -4,28 +4,35 @@
 
 <H2>Enable/Disable</H2>
 <DT>Change status for this program</DT>
-<DD><input class="radio" type="radio" name="loglevel" value="2" <? if (tostring(view.config.loglevel) == "2") then io.write('checked') end ?>>Enable
-<input class="radio" type="radio" name="loglevel" value="3" <? if (tostring(view.config.loglevel) == "3") then io.write('checked') end ?>>Disable</DD>
+<DD><input class="radio" type="radio" name="enabled" value="2" <? if (view.status.enabled) then io.write('checked') end ?> >Enable
+<input class="radio" type="radio" name="enabled" value="3" <? if not (view.status.enabled) then io.write('checked') end ?> >Disable</DD>
 
 <H2>Expert config</H2>
 
 <h3>File details</h3>
 
 <dt>File name</dt>
-<dd>/etc/conf.d/syslogd</dd>
+<dd><?= view.file.details.path ?></dd>
 
 <dt>File size</dt>
-<dd>60</dd>
+<dd><?= view.file.details.size ?></dd>
 
 <dt>Last modified</dt>
-<dd>Mon Aug 20 16:58:19 2007</dd>
+<dd><?= view.file.details.mtimelong ?></dd>
 
 <h3>File content</h3>
 
 <form name="myform" action="" method="POST">
 <input name="name" type=hidden value="">
-<textarea name="modifications"></textarea>
+<textarea name="modifications"><?= view.file.content ?></textarea>
 
 <H2>Save and apply above settings</H2>
 <DT>Apply settings</DT>
 <DD><input class="submitxxx" type="submit" value="Apply"/></DD>
+
+<?
+--[[ DEBUG INFORMATION
+require("debugs")
+io.write(debugs.variables(view))
+--]]
+?>
-- 
cgit v1.2.3