Fix not to use bare words

This commit is contained in:
Ilia Ross
2024-05-27 15:05:15 +03:00
parent 19efd89c28
commit 4155fdb4c5

View File

@@ -31,7 +31,7 @@ if ($in{'idx'} ne '') {
if ($in{'idx'} =~ /^journal-/) {
my @systemctl_cmds = &get_systemctl_cmds(1);
my ($log);
if ($in{idx} eq 'journal-u') {
if ($in{'idx'} eq 'journal-u') {
($log) = grep { $_->{'cmd'} =~ /-u\s+\w+/ } @systemctl_cmds;
$in{'idx'} = $log->{'id'};
}