From 9fe88ea66a28168e940bf02038d4055a5e00a4ee Mon Sep 17 00:00:00 2001 From: Max Kanat-Alexander Date: Sun, 12 Dec 2010 10:55:17 -0800 Subject: Bug 618161: Make VERSION into a constant in two included extensions so that calling $class->VERSION on them won't throw an error on Perl 5.12 when there are non-numeric characters in BUGZILLA_VERSION. r=LpSolit, a=LpSolit --- extensions/OldBugMove/Extension.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'extensions/OldBugMove') diff --git a/extensions/OldBugMove/Extension.pm b/extensions/OldBugMove/Extension.pm index 3aca16a57..b12d36a9a 100644 --- a/extensions/OldBugMove/Extension.pm +++ b/extensions/OldBugMove/Extension.pm @@ -32,12 +32,12 @@ use Bugzilla::Util qw(trim); use Scalar::Util qw(blessed); use Storable qw(dclone); +use constant VERSION => BUGZILLA_VERSION; + # This is 4 because that's what it originally was when this code was # a part of Bugzilla. use constant CMT_MOVED_TO => 4; -our $VERSION = BUGZILLA_VERSION; - sub install_update_db { my $reso_type = Bugzilla::Field::Choice->type('resolution'); my $moved_reso = $reso_type->new({ name => 'MOVED' }); -- cgit v1.2.3-24-g4f1b