From 68b08ba0a7525e7571f304e4756c2e0a8f7d6e47 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Wed, 28 May 2008 17:56:17 +0000
Subject: Check to see if necessary openssl directories exist, add support to
 create them And enddate and daysremaining to list of certificates Add ability
 to renew a certificate

git-svn-id: svn://svn.alpinelinux.org/acf/openssl/trunk@1188 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 openssl-status-html.lsp | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

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

diff --git a/openssl-status-html.lsp b/openssl-status-html.lsp
index 37d45fc..7ba2b95 100644
--- a/openssl-status-html.lsp
+++ b/openssl-status-html.lsp
@@ -9,15 +9,20 @@ io.write(html.cfe_unpack(view))
 <DL>
 <? displayitem(view.value.version) ?>
 <? displayitem(view.value.conffile) ?>
+<? displayitem(view.value.environment) ?>
 <? displayitem(view.value.cacert) ?>
 <? displayitem(view.value.cakey) ?>
 </DL>
 
-<? if not view.value.cacert.errtxt and not view.value.cakey.errtxt then ?>
+<? if not view.value.version.errtxt and not view.value.conffile.errtxt then
+	if view.value.environment.errtxt then
+		if viewlibrary and viewlibrary.dispatch_component and session.permissions.openssl.checkenvironment then
+			viewlibrary.dispatch_component("checkenvironment")
+		end
+	elseif not view.value.cacert.errtxt and not view.value.cakey.errtxt then ?>
 <H1>CA Certificate contents</H1>
 <pre><?= view.value.cacertcontents.value ?></pre>
-<? elseif not view.value.version.errtxt and not view.value.conffile.errtxt then
-	if viewlibrary and viewlibrary.dispatch_component then
+	<? elseif viewlibrary and viewlibrary.dispatch_component then
 		if session.permissions.openssl.putcacert then
 			viewlibrary.dispatch_component("putcacert")
 		end
@@ -26,3 +31,4 @@ io.write(html.cfe_unpack(view))
 		end
 	end
 end ?>
+
-- 
cgit v1.2.3