summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-11-11 01:08:40 +0000
committerfukachan <fukachan>2001-11-11 01:08:40 +0000
commit9198201f86a5a251727ddacce38ce07e7f81d378 (patch)
treebf31496b7a6e12b683ba34be1db59e773dfce96e
parent7fadc55fb4bf2bae8fbf4eb0624045ea89de654c (diff)
downloadfml8-9198201f86a5a251727ddacce38ce07e7f81d378.tar.gz
fml8-9198201f86a5a251727ddacce38ce07e7f81d378.tar.bz2
fml8-9198201f86a5a251727ddacce38ce07e7f81d378.zip
header( -charset => $charset)
-rw-r--r--fml/lib/FML/Process/CGI/Kernel.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/CGI/Kernel.pm b/fml/lib/FML/Process/CGI/Kernel.pm
index 41c74c94..52b738f9 100644
--- a/fml/lib/FML/Process/CGI/Kernel.pm
+++ b/fml/lib/FML/Process/CGI/Kernel.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Kernel.pm,v 1.2 2001/11/09 00:07:10 fukachan Exp $
+# $FML: Kernel.pm,v 1.3 2001/11/10 04:03:13 fukachan Exp $
#
package FML::Process::CGI::Kernel;
@@ -92,7 +92,8 @@ sub prepare
my $config = $curproc->{ config };
my $charset = $config->{ cgi_charset } || 'euc-jp';
- print header(-type => "text/html; charset=$charset");
+ print header(-type => "text/html; charset=$charset",
+ -charset => $charset);
}