From 252bdcb0f0ed034dc7c0fbbea915d329ed93d785 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Thu, 10 Apr 2014 06:26:50 +0000
Subject: Changes to use new htmlviewfunctions functions

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

diff --git a/heimdal-klist-html.lsp b/heimdal-klist-html.lsp
index 2196ad2..e89036a 100644
--- a/heimdal-klist-html.lsp
+++ b/heimdal-klist-html.lsp
@@ -5,10 +5,11 @@
 <% htmlviewfunctions.displaycommandresults({"kdestroy"}, session) %>
 <% htmlviewfunctions.displaycommandresults({"kinit"}, session, true) %>
 
-<h1><%= data.label %></h1>
+<% local header_level = htmlviewfunctions.displaysectionstart(data, page_info) %>
 <pre>
 <%= html.html_escape(data.value) %>
 </pre>
+<% htmlviewfunctions.displaysectionend(header_level) %>
 
 <% if viewlibrary and viewlibrary.dispatch_component and viewlibrary.check_permission("kdestroy") then
 	viewlibrary.dispatch_component("kdestroy")
-- 
cgit v1.2.3