Fix warnings

This commit is contained in:
Ilia Ross
2025-06-15 14:52:29 +03:00
parent faa5dddb0a
commit 3bc15788af

View File

@ -95,8 +95,10 @@ sub main {
undef, 1, undef, undef, 5); undef, 1, undef, undef, 5);
if ($latest_known_versions_remote && if ($latest_known_versions_remote &&
!$latest_known_versions_remote_error) { !$latest_known_versions_remote_error) {
%versions_remote = map{split /=/, $_} %versions_remote = map {
(split(/\n/, $latest_known_versions_remote)); my ($k, $v) = split(/=/, $_, 2);
defined($v) ? ($k => $v) : ();
} split(/\n/, $latest_known_versions_remote);
} elsif ($latest_known_versions_remote_error) { } elsif ($latest_known_versions_remote_error) {
say BRIGHT_YELLOW, "Warning: ", RESET, "Cannot fetch remote packages versions list - $latest_known_versions_remote_error"; say BRIGHT_YELLOW, "Warning: ", RESET, "Cannot fetch remote packages versions list - $latest_known_versions_remote_error";
} }