[openca-cvsdev] CVS: openca-0.9/src/cgi-bin/cgi-public/cmds sendcert,1.2,1.3

[<ope...@li...>]

Update of /cvsroot/openca/openca-0.9/src/cgi-bin/cgi-public/cmds
In directory usw-pr-cvs1:/tmp/cvs-serv21635

Modified Files:
	sendcert 
Log Message:
fixing some problems with not existing ca-certificates


Index: sendcert
===================================================================
RCS file: /cvsroot/openca/openca-0.9/src/cgi-bin/cgi-public/cmds/sendcert,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** sendcert	2001/09/20 11:32:43	1.2
--- sendcert	2001/11/30 09:42:50	1.3
***************
*** 6,9 ****
--- 6,10 ----
  ##
  ##   File Name: sendcert
+ ##     Version: $Revision$
  ##       Brief: submit the ca_certificate
  ## Description: submit the actual ca-certificate
***************
*** 16,23 ****
  
  
! my $cacert = getRequired( 'CACertificate' );
  
  print "Content-Type: application/x-x509-ca-cert\n\n";
- open (FD ,"$cacert") or die "Error: Can't access CA Certificate!";
  
  while (<FD>) {
--- 17,29 ----
  
  
! my $cacert = getRequired( 'PEMCACert' );
! 
! if (not open (FD ,"$cacert")) {
!   print "Content-type: text/html\n\n";
!   configError ( "Can't access CA Certificate!" );
!   exit 100;
! }
  
  print "Content-Type: application/x-x509-ca-cert\n\n";
  
  while (<FD>) {