summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2006-05-03 01:48:24 (GMT)
committerFred Drake <fdrake@acm.org>2006-05-03 01:48:24 (GMT)
commitf863609cd64fef0fa0a36bd464096763c943f07e (patch)
tree9411a154b8a9c0ee8f3065c5ebf2e893bcf72720 /Doc/perl
parente10b21bd6f749557266af67672dfeb1b3edfe76c (diff)
downloadcpython-f863609cd64fef0fa0a36bd464096763c943f07e.zip
cpython-f863609cd64fef0fa0a36bd464096763c943f07e.tar.gz
cpython-f863609cd64fef0fa0a36bd464096763c943f07e.tar.bz2
tell LaTeX2HTML to:
- use UTF-8 output - not mess with the >>> prompt!
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/l2hinit.perl16
1 files changed, 15 insertions, 1 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 89deed0..3f84c8e 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -4,7 +4,14 @@ package main;
use L2hos;
-$HTML_VERSION = 4.0;
+$HTML_VERSION = 4.01;
+$LOWER_CASE_TAGS = 1;
+$NO_FRENCH_QUOTES = 1;
+
+# Force Unicode support to be loaded; request UTF-8 output.
+do_require_extension('unicode');
+do_require_extension('utf8');
+$HTML_OPTIONS = 'utf8';
$MAX_LINK_DEPTH = 2;
$ADDRESS = '';
@@ -106,6 +113,13 @@ sub custom_driver_hook {
$ENV{'TEXINPUTS'} = undef;
}
print "\nSetting \$TEXINPUTS to $TEXINPUTS\n";
+
+ # Not sure why we need to deal with this both here and at the top,
+ # but this is needed to actually make it work.
+ do_require_extension('utf8');
+ $charset = $utf8_str;
+ $CHARSET = $utf8_str;
+ $USE_UTF = 1;
}