1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
diff -1 -c cgi-bin/compose.cgi cgi-bin/compose.cgi-japan
*** cgi-bin/compose.cgi Sun Feb 17 11:16:20 2002
--- cgi-bin/compose.cgi-japan Wed Jan 30 20:53:00 2002
***************
*** 500 ****
--- 501,505 ----
+
+ # japanese - after word wrapping in UTF8 mode (which the submitted form sould be in)
+ # convert to jis (some email programs) don't use Unicode yet.
+ defined &Jcode::getcode and $FORM{'body'} = Jcode->new( $FORM{'body'} )->jis;
+
diff -1 -c cgi-bin/network.cgi cgi-bin/network.cgi-japan
*** cgi-bin/network.cgi Sun Feb 17 11:16:20 2002
--- cgi-bin/network.cgi-japan Wed Jan 30 20:53:00 2002
***************
*** 932 ****
--- 933,935 ----
+ # japanese - UTF8ize unQP'd headers if japanese module available
+ defined &Jcode::getcode and $header = Jcode->new( $header )->utf8;
+
***************
*** 1310 ****
--- 1314,1316 ----
+
+ # japanese - UTF8ize body just prior to HTMLizing if japanese module is avail.
+ defined &Jcode::getcode and $body = Jcode->new( $body )->utf8;
diff -1 -c cgi-bin/nph-mr.cgi cgi-bin/nph-mr.cgi-japan
*** cgi-bin/nph-mr.cgi Sun Feb 17 11:16:20 2002
--- cgi-bin/nph-mr.cgi-japan Wed Jan 30 20:53:00 2002
***************
*** 5 ****
--- 6,7 ----
+ # japanese - Needs Jcode module. libjcode-pm-perl is the debian package
+ use Jcode;
|
