summaryrefslogtreecommitdiff
path: root/Build/source/utils/texi2html/examples/utf8.init
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/utils/texi2html/examples/utf8.init')
-rw-r--r--Build/source/utils/texi2html/examples/utf8.init27
1 files changed, 27 insertions, 0 deletions
diff --git a/Build/source/utils/texi2html/examples/utf8.init b/Build/source/utils/texi2html/examples/utf8.init
new file mode 100644
index 00000000000..2d231e30a8f
--- /dev/null
+++ b/Build/source/utils/texi2html/examples/utf8.init
@@ -0,0 +1,27 @@
+# -*-perl-*-
+$USE_ISO = 0;
+$ENCODING = 'utf-8';
+
+# if the encoding isn't utf-8, we should convert to utf-8 characters.
+
+use Encode;
+use Unicode::Normalize;
+
+foreach my $key (keys(%unicode_accents))
+{
+ $style_map{$key}->{'function'} = \&t2h_utf8_accent;
+ $style_map_texi{$key}->{'function'} = \&t2h_utf8_accent;
+}
+
+foreach my $key (%things_map)
+{
+ if (exists($unicode_map{$key}) and ($unicode_map{$key} ne ''))
+ {
+ $things_map{$key} = chr(hex($unicode_map{$key}));
+ $texi_map{$key} = chr(hex($unicode_map{$key}));
+ }
+}
+
+$normal_text = \&t2h_utf8_normal_text;
+
+1;