diff options
Diffstat (limited to 'httemplate')
| -rw-r--r-- | httemplate/browse/part_virtual_field.cgi | 2 | ||||
| -rw-r--r-- | httemplate/edit/part_virtual_field.cgi | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/browse/part_virtual_field.cgi b/httemplate/browse/part_virtual_field.cgi index a0009dabd..9bb5c1373 100644 --- a/httemplate/browse/part_virtual_field.cgi +++ b/httemplate/browse/part_virtual_field.cgi @@ -23,7 +23,7 @@ foreach (qsearch('part_virtual_field', {})) { <%=table()%> <TH><TD>Field name</TD><TD>Description</TD></TH> -<% foreach my $pvf (sort {$a->name cmp $b->name} @{ $pvfs{$dbtable} }) { %> +<% foreach $pvf (sort {$a->name cmp $b->name} @{ $pvfs{$dbtable} }) { %> <TR> <TD></TD> <TD> diff --git a/httemplate/edit/part_virtual_field.cgi b/httemplate/edit/part_virtual_field.cgi index fb10321e8..8bc84387f 100644 --- a/httemplate/edit/part_virtual_field.cgi +++ b/httemplate/edit/part_virtual_field.cgi @@ -47,7 +47,7 @@ Field #<B><%=$vfieldpart or "(NEW)"%></B><BR><BR> <TD><% if ($action eq 'Add') { %> <SELECT SIZE=1 NAME="dbtable"><% my $dbdef = dbdef; # ick - foreach my $dbtable (sort { $a cmp $b } $dbdef->tables) { + foreach my $dbtable ($dbdef->tables) { if ($dbtable !~ /^h_/ and $dbdef->table($dbtable)->primary_key) { %> <OPTION VALUE="<%=$dbtable%>"><%=$dbtable%></OPTION><% |