From: lpsolit%gmail.com <>
Date: Fri, 17 Oct 2008 19:43:48 +0000 (+0000)
Subject: Bug 390442: Bugzilla/Template.pm fails on perl 5.9.5 (and Perl 5.10) - Patch by Max... 
X-Git-Tag: bugzilla-2.22.6~3
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=cd706199c396f2c694cd5df7315f190fb93afd46;p=thirdparty%2Fbugzilla.git

Bug 390442: Bugzilla/Template.pm fails on perl 5.9.5 (and Perl 5.10) - Patch by Max Kanat-Alexander <mkanat@bugzilla.org> r/a=LpSolit
---

diff --git a/Bugzilla/Template.pm b/Bugzilla/Template.pm
index edb2e148d3..3c42ea30e6 100644
--- a/Bugzilla/Template.pm
+++ b/Bugzilla/Template.pm
@@ -56,7 +56,7 @@ my %constants;
 foreach my $constant (@Bugzilla::Constants::EXPORT,
                       @Bugzilla::Constants::EXPORT_OK)
 {
-    if (defined &{$Bugzilla::Constants::{$constant}}) {
+    if (defined Bugzilla::Constants->$constant) {
         # Constants can be lists, and we can't know whether we're getting
         # a scalar or a list in advance, since they come to us as the return
         # value of a function call, so we have to retrieve them all in list