X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FMason%2FRequest.pm;h=bf704bda7980e3a0d0d3f024be9615b44533801e;hp=9c96b83b400a8f31430af3b2003e586b7d7e2533;hb=83053569b3d965924e2e1d4f5b199609ec7c29af;hpb=262fe981ce32e32058eb01f1a6c3e4112794eb88 diff --git a/FS/FS/Mason/Request.pm b/FS/FS/Mason/Request.pm index 9c96b83b4..bf704bda7 100644 --- a/FS/FS/Mason/Request.pm +++ b/FS/FS/Mason/Request.pm @@ -51,7 +51,8 @@ sub freeside_setup { } else { package HTML::Mason::Commands; - use vars qw( $cgi $p $fsurl ); + use vars qw( $cgi $p $fsurl $lh ); + use Encode; use FS::UID qw( cgisuidsetup ); use FS::CGI qw( popurl rooturl ); @@ -70,6 +71,15 @@ sub freeside_setup { } else { 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); + } }