From fac49f7ab11ad399ac380459ef183f92478b03b4 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 17 Mar 2014 16:21:02 +0000
Subject: Change htmlviewfunctions.displayheader to .displaysectionstart and
 added .displaysectionend function

---
 interfaces-read-html.lsp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'interfaces-read-html.lsp')

diff --git a/interfaces-read-html.lsp b/interfaces-read-html.lsp
index a9150e6..e3e60d2 100644
--- a/interfaces-read-html.lsp
+++ b/interfaces-read-html.lsp
@@ -20,7 +20,7 @@ html = require("acf.html")
 end %>
 
 <% local redir = cfe({type="hidden", value=page_info.orig_action}) %>
-<% htmlviewfunctions.displayheader(view, page_info) %>
+<% local header_level = htmlviewfunctions.displaysectionstart(view, page_info) %>
 <% for i,entry in ipairs(view.value) do
 	local interface = entry.value
 	htmlviewfunctions.displayitemstart()
@@ -58,6 +58,7 @@ end %>
 	</table>
 	<% htmlviewfunctions.displayitemend() %>
 <% end %>
+<% htmlviewfunctions.displaysectionend(header_level) %>
 
 <% if viewlibrary and viewlibrary.dispatch_component then
 	viewlibrary.dispatch_component("restart")
-- 
cgit v1.2.3