diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/unicore/mktables | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index b4f75af0b6..2e061e1d3a 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -1382,10 +1382,11 @@ sub populate_char_info ($) { $end = min($block->containing_range($i)->end, $unassigned_sans_noncharacters-> containing_range($i)-> end); - } else { - my_carp_bug("Can't figure out how to annotate" - . sprintf("U+%04X", $i) - . "Proceeding anyway."); + } + else { + Carp::my_carp_bug("Can't figure out how to annotate " + . sprintf("U+%04X", $i) + . ". Proceeding anyway."); $viacode[$i] = 'UNKNOWN'; $annotate_char_type[$i] = $UNKNOWN_TYPE; $printable[$i] = 0; |