[freeside-commits] freeside/httemplate/edit part_svc.cgi, 1.70, 1.71

Ivan,,, ivan at wavetail.420.am
Fri Aug 6 14:31:06 PDT 2010


Update of /home/cvs/cvsroot/freeside/httemplate/edit
In directory wavetail.420.am:/tmp/cvs-serv24090/httemplate/edit

Modified Files:
	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.70
retrieving revision 1.71
diff -u -w -d -r1.70 -r1.71
--- part_svc.cgi	6 Aug 2010 21:28:09 -0000	1.70
+++ part_svc.cgi	6 Aug 2010 21:31:03 -0000	1.71
@@ -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