perl-File-MMagic/File-MMagic-1.30-rt109673.patch
Petr Šabata d08222d071 RHEL 9.0.0 Alpha bootstrap
The content of this branch was automatically imported from Fedora ELN
with the following as its source:
https://src.fedoraproject.org/rpms/perl-File-MMagic#810594aa18536c5ef5dc5d03632932cfb63859e0
2020-10-16 00:50:31 +02:00

21 lines
599 B
Diff

--- MMagic.pm
+++ MMagic.pm
@@ -929,7 +929,7 @@ sub magicMatch {
}
else {
# $$p_desc .= ' ' . sprintf($message,$data) if $message;
- $$p_desc .= sprintf($message,$data) if $message;
+ $$p_desc .= index($message, '%') >= 0 ? sprintf($message, $data) : $message if $message;
}
my $subtest;
@@ -1094,7 +1094,7 @@ sub magicMatchStr {
}
else {
# $$p_desc .= ' ' . sprintf($message,$data) if $message;
- $$p_desc .= sprintf($message,$data) if $message;
+ $$p_desc .= index($message, '%') >= 0 ? sprintf($message, $data) : $message if $message;
}
my $subtest;