From f9780f645bc94f2f79fc4e266e671d15232d4b9d Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Tue, 4 Mar 2014 02:41:32 +0000
Subject: Change HTML views to use htmlviewfunctions.displayheader

Modified some models to change labels
---
 modules-status-html.lsp | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'modules-status-html.lsp')

diff --git a/modules-status-html.lsp b/modules-status-html.lsp
index d817df5..e70dee1 100644
--- a/modules-status-html.lsp
+++ b/modules-status-html.lsp
@@ -1,7 +1,9 @@
-<% local view = ... %>
+<% local view, viewlibrary, page_info, session = ... %> 
+<% htmlviewfunctions = require("htmlviewfunctions") %>
 <% html = require("acf.html") %>
 
-<h1>Modules</h1>
-
-<h2>Installed modules</h2>
+<%
+local header_level = htmlviewfunctions.displayheader(cfe({label="Modules"}), page_info)
+htmlviewfunctions.displayheader(cfe({label="Installed modules"}), page_info, htmlviewfunctions.incrementheader(header_level))
+%>
 <pre><%= html.html_escape(view.value) %></pre>
-- 
cgit v1.2.3