diff options
author | Tatsuya Kinoshita <tats@debian.org> | 2020-11-12 12:01:16 +0000 |
---|---|---|
committer | Tatsuya Kinoshita <tats@debian.org> | 2020-11-12 12:01:16 +0000 |
commit | 9914a3312fa02f83e00a4a8cf03e0cd69322a8de (patch) | |
tree | 5150438390874485bb5d45062dbf89381f82f060 | |
parent | Update ChangeLog (diff) | |
download | w3m-9914a3312fa02f83e00a4a8cf03e0cd69322a8de.tar.gz w3m-9914a3312fa02f83e00a4a8cf03e0cd69322a8de.zip |
Add charset=Shift_JIS to 2ch.cgi
Diffstat (limited to '')
-rwxr-xr-x | Bonus/2ch.cgi | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Bonus/2ch.cgi b/Bonus/2ch.cgi index 998c202..c52ad8d 100755 --- a/Bonus/2ch.cgi +++ b/Bonus/2ch.cgi @@ -63,7 +63,7 @@ for (0 .. ($lines - 1) / 100) { } $head .= "<a href=\"$cgi/l50\">ŐV50</a>\n"; print <<EOF; -Content-Type: text/html +Content-Type: text/html; charset=Shift_JIS EOF $i = 1; @@ -128,7 +128,7 @@ sub subback { $cmd = "mkdir -p $dir; $WGET -O $tmp $dat >/dev/null 2>&1"; system $cmd; print <<EOF; -Content-Type: text/html +Content-Type: text/html; charset=Shift_JIS EOF @ARGV = ($tmp); @@ -153,7 +153,7 @@ sub post { my $host = $1; my $sock = IO::Socket::INET->new("$host:80") or die; # retrieve posting cookie; this may not work - print "Content-Type: text/html\n\n"; + print "Content-Type: text/html; charset=Shift_JIS\n\n"; print $sock "HEAD /test/bbs.cgi HTTP/1.1\n", "Host: $host\n", |