$NetBSD: patch-share_html_Search_Elements_SelectChartType,v 1.1.2.2 2011/11/02 22:52:22 tron Exp $

perl 5.14 qw() in for* fixes

--- share/html/Search/Elements/SelectChartType.orig	2011-04-14 00:32:21.000000000 +0000
+++ share/html/Search/Elements/SelectChartType
@@ -50,7 +50,7 @@ $Name => 'ChartType'
 $Default => 'bar'
 </%args>
 <select id="<%$Name%>" name="<%$Name%>">
-% foreach my $option qw(bar pie) {
+% foreach my $option ( qw(bar pie) ) {
 % # 'bar' # loc
 % # 'pie' # loc
 <option value="<%$option%>"<% $option eq $Default ? qq[ selected="selected"] : '' |n %>><%loc($option)%></option>
