X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMason%2FRequest.pm;h=d8fd77a664efa0a81841ab37f4a0e049ee9a4512;hb=b79a8cb932946c849328a3c117c35821d9d21e66;hp=565f85eb06bb19e71fc0446cb8addbe16a432011;hpb=3f8ef5c72aa4fbfad5c320d91abdd4f2d547c029;p=freeside.git diff --git a/FS/FS/Mason/Request.pm b/FS/FS/Mason/Request.pm index 565f85eb0..d8fd77a66 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 ); #not using /mt + use Encode; use FS::UID qw( cgisuidsetup ); use FS::CGI qw( popurl rooturl ); @@ -71,6 +72,15 @@ sub freeside_setup { 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); + } + } }