From c500759d83a2068cafd7c5313d6b2be5d93ecbcb Mon Sep 17 00:00:00 2001 From: iliajie Date: Mon, 7 Aug 2023 21:52:22 +0300 Subject: [PATCH] Fix to simplify the code --- web-lib-funcs.pl | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl index ab6806b33..3ece2c88e 100755 --- a/web-lib-funcs.pl +++ b/web-lib-funcs.pl @@ -8842,23 +8842,20 @@ if ($ssl) { { my $cert = Net::SSLeay::X509_STORE_CTX_get_current_cert($_[1]); if ($cert) { - my $subject = Net::SSLeay::X509_NAME_oneline( - Net::SSLeay::X509_get_subject_name($cert)); - my $issuer = Net::SSLeay::X509_NAME_oneline( - Net::SSLeay::X509_get_issuer_name($cert)); my $errnum = Net::SSLeay::X509_STORE_CTX_get_error($_[1]); if ($errnum) { my $error_string = ""; eval { $error_string = Net::SSLeay::X509_verify_cert_error_string($errnum); - if ($error_string) { - $error_string = " : $error_string"; - } + $error_string = " $error_string" + if ($error_string); }; if ($error_string) { $main::last_set_verify_err = $error_string; } else { + my $issuer = Net::SSLeay::X509_NAME_oneline( + Net::SSLeay::X509_get_issuer_name($cert)); $main::last_set_verify_err = "Certificate is signed by an ". "unknown CA : $issuer (code $errnum)";