From eadd47e886f52f3b07b088ef23220cd54fadfac0 Mon Sep 17 00:00:00 2001
From: Ilia Ross <ilia@ross.gdn>
Date: Tue, 7 Jul 2026 23:45:03 +0200
Subject: [PATCH] Fix to replace with block eval

---
 acl/acl-lib.pl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/acl/acl-lib.pl b/acl/acl-lib.pl
index 02ad50a00..78703de76 100755
--- a/acl/acl-lib.pl
+++ b/acl/acl-lib.pl
@@ -22,7 +22,11 @@ do 'md5-lib.pl';
 our ($module_root_directory, %text, %sessiondb, %config, %gconfig,
      $base_remote_user, %hash_session_id_cache, $session_hmac_key,
      $loaded_session_keyfile, $use_hmac_sha256);
-eval "use Digest::SHA qw(hmac_sha256_hex); hmac_sha256_hex('x', 'y');";
+eval {
+	require Digest::SHA;
+	Digest::SHA::hmac_sha256_hex('x', 'y');
+	1;
+	};
 $use_hmac_sha256 = 1 if (!$@);
 our %access = &get_module_acl();
 $access{'switch'} = 0 if (&is_readonly_mode());