From 899e600e7f5689521f393a376d82e8ea95fc9135 Mon Sep 17 00:00:00 2001
From: Michael Herger <michael@herger.net>
Date: Thu, 22 Aug 2024 23:06:33 +0200
Subject: [PATCH] Another attempt at fixing the Perl modules information.

---
 Slim/Menu/SystemInfo.pm | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/Slim/Menu/SystemInfo.pm b/Slim/Menu/SystemInfo.pm
index 6db5b106c47..bbee60a9b79 100644
--- a/Slim/Menu/SystemInfo.pm
+++ b/Slim/Menu/SystemInfo.pm
@@ -373,11 +373,14 @@ sub infoPerl {
 		{
 			type => 'text',
 			name => 'Mozilla::CA' . cstring($client, 'COLON') . ' ' . ($Mozilla::CA::VERSION || cstring($client, 'UNK')),
-		},
+		};
 
-		{
-			type => 'text',
-			name => sprintf("Net::SSLeay%s %s - %s", cstring($client, 'COLON'), $Net::SSLeay::VERSION, Net::SSLeay::SSLeay_version(Net::SSLeay::SSLEAY_VERSION())),
+		# add an extra eval, as on systems missing that library we could fail the whole menu
+		eval {
+			push @{$items}, {
+				type => 'text',
+				name => sprintf("Net::SSLeay%s %s - %s", cstring($client, 'COLON'), $Net::SSLeay::VERSION, Net::SSLeay::SSLeay_version(Net::SSLeay::SSLEAY_VERSION())),
+			};
 		};
 	}
 	else {