[freeside-commits] freeside/httemplate/pref pref-process.html, 1.6, 1.7

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/pref
In directory wavetail:/tmp/cvs-serv23435/httemplate/pref

Modified Files:
	pref-process.html 
Log Message:
event refactor, landing on HEAD!

Index: pref-process.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/pref/pref-process.html,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- pref-process.html	5 Apr 2007 01:38:51 -0000	1.6
+++ pref-process.html	1 Aug 2007 22:26:44 -0000	1.7
@@ -27,6 +27,8 @@
 %
 % }
 %
+% my %param = $access_user->options;
+%
 % #XXX autogen
 % my @paramlist = qw( menu_position
 %                     email_address
@@ -40,9 +42,11 @@
 %   last;
 % }
 %
-% $error ||= $access_user->replace( {
-%   map { $_ => scalar($cgi->param($_)) } @paramlist,
-% } );
+% foreach (@paramlist) {
+%   $param{$_} = scalar($cgi->param($_));
+% }
+%
+% $error ||= $access_user->replace( \%param );
 %
 % if ( $error ) {
 %   $cgi->param('error', $error);