From c1b077456a525ab90afee9f3616700c07e7b487e Mon Sep 17 00:00:00 2001 From: Thomas Lamprecht Date: Tue, 7 Mar 2023 18:06:26 +0100 Subject: [PATCH] cert: drop single-use warn helper Signed-off-by: Thomas Lamprecht --- src/PVE/Certificate.pm | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/src/PVE/Certificate.pm b/src/PVE/Certificate.pm index 10e7301..6fecc35 100644 --- a/src/PVE/Certificate.pm +++ b/src/PVE/Certificate.pm @@ -184,12 +184,6 @@ my sub ssl_die { Net::SSLeay::die_now("$msg\n"); }; -my $ssl_warn = sub { - my ($msg) = @_; - Net::SSLeay::print_errs(); - warn $msg if $msg; -}; - my $read_certificate = sub { my ($cert_path) = @_; @@ -377,7 +371,7 @@ sub generate_csr { my $cleanup = sub { my ($warn, $die_msg) = @_; - $ssl_warn->() if $warn; + Net::SSLeay::print_errs() if $warn; Net::SSLeay::X509_REQ_free($req) if $req; Net::SSLeay::EVP_PKEY_free($pk) if $pk; -- 2.39.2