From f61cc1dd36392d3b0eedb2d14e61ade7462ce2fd Mon Sep 17 00:00:00 2001 From: Byron Jones Date: Wed, 23 Jan 2013 17:02:33 +0800 Subject: Fix breakage due to ancient perl version --- extensions/BMO/lib/Reports.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'extensions/BMO/lib/Reports.pm') diff --git a/extensions/BMO/lib/Reports.pm b/extensions/BMO/lib/Reports.pm index cf663dcd9..4b8252d66 100644 --- a/extensions/BMO/lib/Reports.pm +++ b/extensions/BMO/lib/Reports.pm @@ -719,7 +719,7 @@ sub group_members_report { $vars->{'groups'} = \@group_names; # load selected group - my $group = lc(trim($cgi->param('group') // '')); + my $group = lc(trim($cgi->param('group') || '')); $group = '' unless grep { $_ eq $group } @group_names; return if $group eq ''; my $group_obj = Bugzilla::Group->new({ name => $group }); -- cgit v1.2.3-24-g4f1b