Bug 1270550 - Can't locate loadable object for module main::Tie::Hash::NamedCapture...

r=dkl

diff --git a/Bugzilla.pm b/Bugzilla.pm
index 802f1584525b26b149bbb184347ce4132ff018ef..032d0835563ef65b8eb0d4fed05f971691df42d6 100644 (file)
--- a/Bugzilla.pm
+++ b/Bugzilla.pm
@@ -45,6 +45,8 @@ use File::Basename;
 use File::Spec::Functions;
 use DateTime::TimeZone;
 use Date::Parse;
+# Bug 1270550 - Tie::Hash::NamedCapture must be loaded before Safe.
+use Tie::Hash::NamedCapture;
 use Safe;
 use List::Util qw(first);
 

diff --git a/Bugzilla/DB/Schema.pm b/Bugzilla/DB/Schema.pm
index 6f06aac340bc901955029f92bc5f4c53a77bf688..9b59d1b826bf4441926101198dc9b9a5897ef571 100644 (file)
--- a/Bugzilla/DB/Schema.pm
+++ b/Bugzilla/DB/Schema.pm
@@ -28,6 +28,8 @@ use Carp qw(confess);
 use Digest::MD5 qw(md5_hex);
 use Hash::Util qw(lock_value unlock_hash lock_keys unlock_keys);
 use List::MoreUtils qw(firstidx natatime);
+# Bug 1270550 - Tie::Hash::NamedCapture must be loaded before Safe.
+use Tie::Hash::NamedCapture;
 use Safe;
 # Historical, needed for SCHEMA_VERSION = '1.00'
 use Storable qw(dclone freeze thaw);

diff --git a/Bugzilla/Install/Localconfig.pm b/Bugzilla/Install/Localconfig.pm
index 4a3b09f83584dc55b088eeeac1ef445e36cfa555..d5de236e0313eefa6c445121ab9955755b4fcaf1 100644 (file)
--- a/Bugzilla/Install/Localconfig.pm
+++ b/Bugzilla/Install/Localconfig.pm
@@ -27,6 +27,7 @@ use Data::Dumper;
 use File::Basename qw(dirname);
 use English qw($EGID);
 use List::Util qw(first);
+use Tie::Hash::NamedCapture;
 use Safe;
 use Term::ANSIColor;
 

diff --git a/Bugzilla/Migrate.pm b/Bugzilla/Migrate.pm
index 5a2defe158400dfbf17cebff3c3d8554fb628984..b23fc5b53908a745b45c4db51360f14518254ccd 100644 (file)
--- a/Bugzilla/Migrate.pm
+++ b/Bugzilla/Migrate.pm
@@ -30,6 +30,8 @@ use DateTime;
 use Fcntl qw(SEEK_SET);
 use File::Basename;
 use List::Util qw(first);
+# Bug 1270550 - Tie::Hash::NamedCapture must be loaded before Safe.
+use Tie::Hash::NamedCapture;
 use Safe;
 
 use constant CUSTOM_FIELDS      => {};

diff --git a/checksetup.pl b/checksetup.pl
index aacdf41be45a00696141d7086abb303aa4d28c6a..b63b94ec65f7851abc2cdf02ce4dad20f244564d 100755 (executable)
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -22,6 +22,8 @@ use lib qw(. lib local/lib/perl5);
 
 use Getopt::Long qw(:config bundling);
 use Pod::Usage;
+# Bug 1270550 - Tie::Hash::NamedCapture must be loaded before Safe.
+use Tie::Hash::NamedCapture;
 use Safe;
 
 use Bugzilla::Constants;