Added filenames for error messages

This commit is contained in:
root 2008-08-25 19:19:02 +00:00
parent 76b882ffb2
commit e4da3093ce

View file

@ -775,7 +775,7 @@ sub HandleCerts($$)
undef $/; undef $/;
my $content=<IN>; my $content=<IN>;
close IN; close IN;
SysLog "Read.\n" if($debug); SysLog "Read $csrname.\n" if($debug);
SysLog "Subject: --$row{'subject'}--\n" if($debug); SysLog "Subject: --$row{'subject'}--\n" if($debug);
my ($SAN,$subject)=X509extractSAN($row{'subject'}); my ($SAN,$subject)=X509extractSAN($row{'subject'});
@ -958,7 +958,7 @@ sub HandleGPG()
undef $/; undef $/;
my $content=<IN>; my $content=<IN>;
close IN; close IN;
SysLog "Read.\n"; SysLog "Read $csrname.\n";
$crt=Request($ver,1,2,0,0,2,366,0,$content,"",""); $crt=Request($ver,1,2,0,0,2,366,0,$content,"","");
if(length($crt)) if(length($crt))
{ {