From 1ee3582032c6eb9154279768dc4f98898b94492e Mon Sep 17 00:00:00 2001 From: Andrew Speer Date: Mon, 16 May 2022 13:43:30 +0930 Subject: [PATCH] Workaround to endable Markdown::Pod to test OK on older Perl cersions (e.g. 5.16 on RHEL 7.9) --- lib/Markdown/Pod.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/Markdown/Pod.pm b/lib/Markdown/Pod.pm index 53e01da..86a28d1 100644 --- a/lib/Markdown/Pod.pm +++ b/lib/Markdown/Pod.pm @@ -28,6 +28,7 @@ sub markdown_to_pod { my $capture = q{}; open my $fh, '>', \$capture or die $!; + bless $fh, 'IO::File'; # A.Speer: Compatibility with older Perl versions if ($encoding) { my $found = first { $_ eq $encoding } Encode->encodings;