[freeside-commits] freeside/httemplate/edit part_svc.cgi, 1.62.2.8, 1.62.2.9
Ivan,,,
ivan at wavetail.420.am
Fri Aug 6 14:31:09 PDT 2010
Update of /home/cvs/cvsroot/freeside/httemplate/edit
In directory wavetail.420.am:/tmp/cvs-serv24098/httemplate/edit
Modified Files:
Tag: FREESIDE_1_9_BRANCH
part_svc.cgi
Log Message:
communigate phase 3: archive messages, RT#7515
Index: part_svc.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/part_svc.cgi,v
retrieving revision 1.62.2.8
retrieving revision 1.62.2.9
diff -u -w -d -r1.62.2.8 -r1.62.2.9
--- part_svc.cgi 6 Aug 2010 21:28:03 -0000 1.62.2.8
+++ part_svc.cgi 6 Aug 2010 21:31:07 -0000 1.62.2.9
@@ -298,10 +298,10 @@
% $item. '</OPTION>';
% } #next $item
% } elsif ( $def->{select_hash} ) {
-% $def->{select_hash} = tie %{ $def->{select_hash} },
-% 'Tie::IxHash',
-% @{ $def->{select_hash} }
-% if ref($def->{select_hash}) eq 'ARRAY';
+% if ( ref($def->{select_hash}) eq 'ARRAY' ) {
+% tie my %hash, 'Tie::IxHash', @{ $def->{select_hash} };
+% $def->{select_hash} = \%hash;
+% }
% foreach my $key ( keys %{$def->{select_hash}} ) {
% $html .= qq!<OPTION VALUE="$key"!.
% (grep(/^$key$/, split(',',$value)) ? ' SELECTED>' : '>' ).
More information about the freeside-commits
mailing list