[freeside-commits] freeside/FS/FS/Mason Request.pm,1.6,1.7

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/Mason
In directory wavetail.420.am:/tmp/cvs-serv23147/FS/FS/Mason

Modified Files:
	Request.pm 
Log Message:
utf-8, RT#12514

Index: Request.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Mason/Request.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- Request.pm	27 Jan 2011 21:46:58 -0000	1.6
+++ Request.pm	24 Apr 2011 00:33:37 -0000	1.7
@@ -52,6 +52,7 @@
 
       package HTML::Mason::Commands;
       use vars qw( $cgi $p $fsurl );
+      use Encode;
       use FS::UID qw( cgisuidsetup );
       use FS::CGI qw( popurl rooturl );
 
@@ -71,6 +72,15 @@
         die "unknown mode $mode";
       }
     
+    #
+    foreach my $param ( $cgi->param ) {
+      my @values = $cgi->param($param);
+      next if $cgi->uploadInfo($values[0]);
+      #warn $param;
+      @values = map decode(utf8=>$_), @values;
+      $cgi->param($param, @values);
+    }
+    
   }
 
 }