summaryrefslogtreecommitdiffstats
path: root/pki/base/ra/lib/perl/PKI
diff options
context:
space:
mode:
authorvakwetu <vakwetu@c9f7a03b-bd48-0410-a16d-cbbf54688b0b>2010-11-15 20:22:45 +0000
committervakwetu <vakwetu@c9f7a03b-bd48-0410-a16d-cbbf54688b0b>2010-11-15 20:22:45 +0000
commit23e51797c4d54e60c7285fc03baceda10cf5e4fb (patch)
tree74d43130ae63b048789a73b4b7541c0d370d12d7 /pki/base/ra/lib/perl/PKI
parentbf560d2a301c3673ed7c4f221d0d60385bd14f16 (diff)
downloadpki-23e51797c4d54e60c7285fc03baceda10cf5e4fb.tar.gz
pki-23e51797c4d54e60c7285fc03baceda10cf5e4fb.tar.xz
pki-23e51797c4d54e60c7285fc03baceda10cf5e4fb.zip
Bugzilla Bug 651916 - kra and ocsp are using incorrect ports to talk to CA and complete configuration in DonePanel
git-svn-id: svn+ssh://svn.fedorahosted.org/svn/pki/trunk@1498 c9f7a03b-bd48-0410-a16d-cbbf54688b0b
Diffstat (limited to 'pki/base/ra/lib/perl/PKI')
-rwxr-xr-xpki/base/ra/lib/perl/PKI/RA/AdminPanel.pm1
-rwxr-xr-xpki/base/ra/lib/perl/PKI/RA/CAInfoPanel.pm2
-rwxr-xr-xpki/base/ra/lib/perl/PKI/RA/ImportAdminCertPanel.pm3
3 files changed, 2 insertions, 4 deletions
diff --git a/pki/base/ra/lib/perl/PKI/RA/AdminPanel.pm b/pki/base/ra/lib/perl/PKI/RA/AdminPanel.pm
index 6cf1c69c4..ebf2a0cd9 100755
--- a/pki/base/ra/lib/perl/PKI/RA/AdminPanel.pm
+++ b/pki/base/ra/lib/perl/PKI/RA/AdminPanel.pm
@@ -91,7 +91,6 @@ sub update
$cert_request =~ s/%0D%0A//g; # remove carraige return
# submit request to CA
-# my $cainfo = $::config->get("preop.cainfo.select");
# Admin Certificate should be obtained from the ca selected in the
# name panel. If name panel use External CA, the admin certificate
diff --git a/pki/base/ra/lib/perl/PKI/RA/CAInfoPanel.pm b/pki/base/ra/lib/perl/PKI/RA/CAInfoPanel.pm
index 7e20e222d..c8f2e43fd 100755
--- a/pki/base/ra/lib/perl/PKI/RA/CAInfoPanel.pm
+++ b/pki/base/ra/lib/perl/PKI/RA/CAInfoPanel.pm
@@ -120,7 +120,7 @@ sub update
&PKI::RA::Wizard::debug_log("CAInfoPanel: update - host= $host, https_ee_port= $https_ee_port");
- $::config->put("preop.cainfo.select", "https://$host:$https_ee_port");
+ $::config->put("preop.cainfo.select", "https://$host:$https_admin_port");
my $serverCertNickName = $::config->get("preop.cert.sslserver.nickname");
my $subsystemCertNickName = $::config->get("preop.cert.subsystem.nickname");
diff --git a/pki/base/ra/lib/perl/PKI/RA/ImportAdminCertPanel.pm b/pki/base/ra/lib/perl/PKI/RA/ImportAdminCertPanel.pm
index 4ab51f1b7..ea05a8ccd 100755
--- a/pki/base/ra/lib/perl/PKI/RA/ImportAdminCertPanel.pm
+++ b/pki/base/ra/lib/perl/PKI/RA/ImportAdminCertPanel.pm
@@ -122,8 +122,7 @@ sub display
my ($q) = @_;
&PKI::RA::Wizard::debug_log("ImportAdminCertPanel: display");
-# my $cainfo = $::config->get("preop.cainfo.select");
- my $cainfo = "https://".$::config->get("conn.ca1.hostadminport");
+ my $cainfo = $::config->get("preop.cainfo.select");
my $cainfo_url = new URI::URL($cainfo);
my $serialNumber = $::config->get("preop.admincert.serialno.0");