From 6c05e313641c283de096777cc1126a098d0ed1aa Mon Sep 17 00:00:00 2001
From: Mika Havela <mika.havela@gmail.com>
Date: Wed, 7 Oct 2009 10:43:25 +0200
Subject: Graphical fix. Now displaying logonstatus as other views.

---
 app/acf-util/logon-status-html.lsp | 21 +++++++++++++--------
 1 file changed, 13 insertions(+), 8 deletions(-)

diff --git a/app/acf-util/logon-status-html.lsp b/app/acf-util/logon-status-html.lsp
index 753248f..be905f3 100644
--- a/app/acf-util/logon-status-html.lsp
+++ b/app/acf-util/logon-status-html.lsp
@@ -1,8 +1,13 @@
-<% local view= ... %> 
-<% --[[
-	io.write(html.cfe_unpack(view))
---]] %>
-<h1>User Status </h1>
-<p> Below is your current Session id <p>
-<%= html.html_escape(view.value.sessionid.value) %>
-<p>You are currently known to the system as <%= html.html_escape(view.value.username.value) %>.</p>
+<% local view = ... %>
+
+<h1>User Status</h1>
+
+<DL>
+
+<DT><%= html.html_escape(view.value.username.label) %></DT>
+<DD><%= html.html_escape(view.value.username.value) %></DD>
+
+<DT><%= html.html_escape(view.value.sessionid.label) %></DT>
+<DD><%= html.html_escape(view.value.sessionid.value) %></DD>
+
+</DL>
-- 
cgit v1.2.3