From 2f023c3e0598a47fa7efb2b49ed3c912d5cdc09e Mon Sep 17 00:00:00 2001 From: pjrm Date: Wed, 7 Mar 2007 12:26:13 +0000 Subject: [PATCH] =?utf8?q?Fix=20what=20appears=20to=20be=20a=20copy&paste?= =?utf8?q?=20bug:=20=C4=87=20was=20getting=20rendered=20as=20=CB=87c;=20ch?= =?utf8?q?anged=20it=20to=20=C2=B4c.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- utf8-to-roff | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/utf8-to-roff b/utf8-to-roff index de937782d..5604f1416 100755 --- a/utf8-to-roff +++ b/utf8-to-roff @@ -11,6 +11,7 @@ use strict; # perl -CI -nae 'my ($ch, $seq) = @F; if (ord($ch) >= 128) { printf(" 0x\%x, q{\%s},\n", ord($ch), $seq); }' # with č (0x10d) manually translated as ˇc (\[ah]c). (Anyone have a better translation, e.g. using # overprint? \[vc] doesn't work, btw.) +# Similarly, ć (0x107) has been manually translated as ´c (\[aa]c). my %map = ( 0xd0, q{\[-D]}, 0xf0, q{\[Sd]}, @@ -77,7 +78,7 @@ my %map = ( 0xe3, q{\[~a]}, 0xf1, q{\[~n]}, 0xf5, q{\[~o]}, - 0x107, q{\[ah]c}, # Added manually; see above. + 0x107, q{\[aa]c}, # Added manually; see above. 0x10d, q{\[ah]c}, # Added manually; see above. 0x160, q{\[vS]}, 0x161, q{\[vs]}, -- 2.30.2