From 5299da1556ec4ccf5c93fea0d1c4dcef5f6bb180 Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Thu, 28 Dec 2023 03:31:15 +0100 Subject: [PATCH] common: ignore unrelated errors after loading data Failure will always be indicated in the eval error, regardless of remnant $! from another open. --- common.inc.plp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/common.inc.plp b/common.inc.plp index 9d34128..0754d85 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -106,7 +106,7 @@ sub Data { local $/; # slurp return JSON::decode_json(readline $cache); }; - if ($! or $@ or !@data or !$data[0]) { + if ($@ or !@data or !$data[0]) { die ['Table data not found', $@ || $!]; } if (@data == 1 and ref $data[0] eq 'HASH' and not %{$data[0]}) { -- 2.30.0