X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FMason%2FRequest.pm;h=bf704bda7980e3a0d0d3f024be9615b44533801e;hp=dd7ee4d371af2394f3e7438dfda6b5a5ee7ce0f4;hb=83053569b3d965924e2e1d4f5b199609ec7c29af;hpb=09f8c585713778224eafa929d2ec3d83a3f8339a diff --git a/FS/FS/Mason/Request.pm b/FS/FS/Mason/Request.pm index dd7ee4d37..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,9 +71,16 @@ sub freeside_setup { } else { die "unknown mode $mode"; } - - $CGITempFile::TMPDIRECTORY = "$FS::UID::cache_dir/cache.$FS::UID::datasrc"; + # + 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); + } + } }