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-10 18:35:17.000000000 -0600
+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm    2008-03-10 18:34:14.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;
 
@@ -370,6 +370,7 @@
         -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	slords	1.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-10 18:35:17.000000000 -0600
3			+++ mezzanine_patched_perl-CGI-FormMagick-0.92/lib/CGI/FormMagick.pm 2008-03-10 18:34:14.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			@@ -370,6 +370,7 @@
14			-pragma => 'no-cache',
15			'-cache-control' => 'no-cache',
16			- -expires => '-1d'
17			+ -expires => '-1d',
18			+ -charset => $self->{charset},
19			);
20			$self->debug_msg("The page number started out as $self->{page_number}");
21