perl-CGI-FormMagick/sme8/perl-CGI-FormMagick-0.92-UTF8.patch

diff -Nur -x '*.orig' -x '*.rej' perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm
--- perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm      2008-03-24 15:46:53.000000000 -0600
+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm    2008-03-24 15:45:40.000000000 -0600
@@ -178,7 +178,7 @@
 
     $self->{inputtype}  = $args{type}   || "file";
     $self->{source}     = $args{source};
-    $self->{charset}    = $args{charset} || undef;
+    $self->{charset}    = $args{charset} || 'UTF-8';
     $self->{cgi}        = $args{cgi};
     $self->{debug}      = $args{debug}      || 0;
 
@@ -369,7 +369,8 @@
     print $self->{cgi}->header(
         -pragma => 'no-cache',
         '-cache-control' => 'no-cache',
-        -expires => '-1d'
+        -expires => '-1d',
+        -charset => $self->{charset},
         );
     $self->debug_msg("The page number started out as $self->{page_number}");
 
1	diff -Nur -x '.orig' -x '.rej' perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm
2	--- perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm 2008-03-24 15:46:53.000000000 -0600
3	+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm 2008-03-24 15:45:40.000000000 -0600
4	@@ -178,7 +178,7 @@
5
6	$self->{inputtype} = $args{type} \|\| "file";
7	$self->{source} = $args{source};
8	- $self->{charset} = $args{charset} \|\| undef;
9	+ $self->{charset} = $args{charset} \|\| 'UTF-8';
10	$self->{cgi} = $args{cgi};
11	$self->{debug} = $args{debug} \|\| 0;
12
13	@@ -369,7 +369,8 @@
14	print $self->{cgi}->header(
15	-pragma => 'no-cache',
16	'-cache-control' => 'no-cache',
17	- -expires => '-1d'
18	+ -expires => '-1d',
19	+ -charset => $self->{charset},
20	);
21	$self->debug_msg("The page number started out as $self->{page_number}");
22