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 |
|