From: Eric Wong <e@80x24.org>
Date: Thu, 14 Nov 2019 10:57:32 +0000 (+0000)
Subject: doc: mknews: support Email::MIME <1.930
X-Git-Tag: v1.3.0~308
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=738a8361e52158ca9d4463e342b6c55b6eceb063;p=public-inbox.git

doc: mknews: support Email::MIME <1.930

Email::MIME::header_str is not available until 1.930, so the
rest of our code uses Email::MIME::header for compatibility
with distros, since CentOS 7.x only has 1.926.
---

diff --git a/Documentation/mknews.perl b/Documentation/mknews.perl
index e78c1cb8..5ede3696 100755
--- a/Documentation/mknews.perl
+++ b/Documentation/mknews.perl
@@ -80,7 +80,7 @@ sub release2mime {
 
 sub mime2txt {
 	my ($out, $mime) = @_;
-	my $title = $mime->header_str('Subject');
+	my $title = $mime->header('Subject');
 	$title =~ s/^\s*\[\w+\]\s*//g; # [ANNOUNCE] or [ANN]
 	my $dtime = msg_datestamp($mime->header_obj);
 	$title .= ' - ' . PublicInbox::View::fmt_ts($dtime) . ' UTC';