check for File::Temp 0.19 for ->newdir method

This is distributed with Perl 5.10.1 and onwards, so it should
not be an installation burden for any users.  I'm planning to
move away from tempdir() entirely and use File::Temp->newdir to
remove dependencies on END{} blocks.

diff --git a/Makefile.PL b/Makefile.PL
index 1c70c6f3bb133412825c521d73efa7d61047fbc6..f650fdeaea143ee491801af95d02e9420a3dabf0 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -54,7 +54,7 @@ WriteMakefile(
                # All Perl installs I know about have these, but RH-based
                # distros make them separate even though 'perl' pulls them in
                'File::Path' => 0,
-               'File::Temp' => 0,
+               'File::Temp' => '0.19',
                'Getopt::Long' => 0,
                'Exporter' => 0,
                # ExtUtils::MakeMaker # this file won't run w/o it...

diff --git a/lib/PublicInbox/SolverGit.pm b/lib/PublicInbox/SolverGit.pm
index 95334d7a8eeb4364738c4482ed457ec0dc27461d..eea59b6ddbda047496fe4917517fe4b3c6c53bdb 100644 (file)
--- a/lib/PublicInbox/SolverGit.pm
+++ b/lib/PublicInbox/SolverGit.pm
@@ -10,7 +10,7 @@
 package PublicInbox::SolverGit;
 use strict;
 use warnings;
-use File::Temp qw();
+use File::Temp 0.19 ();
 use Fcntl qw(SEEK_SET);
 use PublicInbox::Git qw(git_unquote git_quote);
 use PublicInbox::MsgIter qw(msg_iter msg_part_text);

diff --git a/lib/PublicInbox/WatchMaildir.pm b/lib/PublicInbox/WatchMaildir.pm
index e923178066fcac20f7e4e5a6c331354ee7d5a7da..003baec90f3d14905a09d210744fdaedd60468c2 100644 (file)
--- a/lib/PublicInbox/WatchMaildir.pm
+++ b/lib/PublicInbox/WatchMaildir.pm
@@ -9,7 +9,7 @@ use warnings;
 use PublicInbox::MIME;
 use PublicInbox::Spawn qw(spawn);
 use PublicInbox::InboxWritable;
-use File::Temp qw//;
+use File::Temp 0.19 ();
 use PublicInbox::Filter::Base;
 use PublicInbox::Spamcheck;
 *REJECT = *PublicInbox::Filter::Base::REJECT;

diff --git a/script/public-inbox-edit b/script/public-inbox-edit
index 1900b267fbaed598867dfd66917bad778a0c207f..2a9f0531f7377dfc4f2c02a995c7133eeb579fdd 100755 (executable)
--- a/script/public-inbox-edit
+++ b/script/public-inbox-edit
@@ -8,7 +8,7 @@ use strict;
 use warnings;
 use Getopt::Long qw(:config gnu_getopt no_ignore_case auto_abbrev);
 use PublicInbox::AdminEdit;
-use File::Temp ();
+use File::Temp 0.19 ();
 use PublicInbox::ContentId qw(content_id);
 use PublicInbox::MID qw(mid_clean mids);
 PublicInbox::Admin::check_require('-index');