diff options
Diffstat (limited to 'src/backend/utils/mb/Unicode/UCS_to_most.pl')
| -rwxr-xr-x | src/backend/utils/mb/Unicode/UCS_to_most.pl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/backend/utils/mb/Unicode/UCS_to_most.pl b/src/backend/utils/mb/Unicode/UCS_to_most.pl index acc03e3809e..60431a6a27e 100755 --- a/src/backend/utils/mb/Unicode/UCS_to_most.pl +++ b/src/backend/utils/mb/Unicode/UCS_to_most.pl @@ -16,7 +16,9 @@ # # and Unicode name (not used in this script) use strict; -require convutils; +use convutils; + +my $this_script = $0; my %filename = ( 'WIN866' => 'CP866.TXT', @@ -54,5 +56,5 @@ foreach my $charset (@charsets) { my $mapping = &read_source($filename{$charset}); - print_tables($charset, $mapping); + print_conversion_tables($this_script, $charset, $mapping); } |