From 1fe4570cf952ba3f4162f041b2bcaf8a92330505 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 8 Nov 2010 00:01:59 +0000
Subject: certificates ala communigate, RT#7515

---
 httemplate/edit/process/svc_cert.cgi | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'httemplate/edit/process')

diff --git a/httemplate/edit/process/svc_cert.cgi b/httemplate/edit/process/svc_cert.cgi
index a8dc0ca8a..0e6037e31 100644
--- a/httemplate/edit/process/svc_cert.cgi
+++ b/httemplate/edit/process/svc_cert.cgi
@@ -66,6 +66,14 @@ if ( $cgi->param('privatekey') eq '_generate' ) { #generate
   $new->certificate( $cgi->param('certificate') );
   $new->$_( $old->$_ ) for grep $old->$_, qw( recnum common_name organization organization_unit city state country cert_contact );
 
+} elsif ( $cgi->param('cacert') ) {
+
+  $popup = 'view';
+  $title = 'Certificate authority chain imported';
+
+  $new->cacert( $cgi->param('cacert') );
+  $new->$_( $old->$_ ) for grep $old->$_, qw( recnum common_name organization organization_unit city state country cert_contact );
+
 }
 
 my $error = '';
-- 
cgit v1.2.1