From 5ba4b1aff6564126b3d0b1e7741b992d178d8f66 Mon Sep 17 00:00:00 2001 From: Frédéric Buclin Date: Thu, 28 Oct 2010 17:20:46 +0200 Subject: Bug 607966: Use of qw(...) as parentheses is deprecated since Perl 5.13.5 r=gerv a=LpSolit --- Bugzilla/Bug.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Bugzilla/Bug.pm') diff --git a/Bugzilla/Bug.pm b/Bugzilla/Bug.pm index abc00c298..d3f0023b8 100644 --- a/Bugzilla/Bug.pm +++ b/Bugzilla/Bug.pm @@ -1481,7 +1481,7 @@ sub _check_dependencies { my %deps_in = (dependson => $depends_on || '', blocked => $blocks || ''); - foreach my $type qw(dependson blocked) { + foreach my $type (qw(dependson blocked)) { my @bug_ids = ref($deps_in{$type}) ? @{$deps_in{$type}} : split(/[\s,]+/, $deps_in{$type}); -- cgit v1.2.3-24-g4f1b