diff options
| author | Peter Eisentraut <peter_e@gmx.net> | 2017-10-19 05:58:39 -0400 |
|---|---|---|
| committer | Peter Eisentraut <peter_e@gmx.net> | 2017-10-19 05:58:39 -0400 |
| commit | 927e1ee2cb74e3bc49454dfa181dcce83b70d371 (patch) | |
| tree | 65176aff26cf7127126d72ebf380335e97121561 | |
| parent | bf54c0f05c0a58db17627724a83e1b6d4ec2712c (diff) | |
| download | postgresql-927e1ee2cb74e3bc49454dfa181dcce83b70d371.tar.gz postgresql-927e1ee2cb74e3bc49454dfa181dcce83b70d371.zip | |
UCS_to_most.pl: Process encodings in sorted order
Otherwise the order depends on the Perl hash implementation, making it
cumbersome to scan the output when debugging.
| -rwxr-xr-x | src/backend/utils/mb/Unicode/UCS_to_most.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/backend/utils/mb/Unicode/UCS_to_most.pl b/src/backend/utils/mb/Unicode/UCS_to_most.pl index 60431a6a27e..1c3922e2ffa 100755 --- a/src/backend/utils/mb/Unicode/UCS_to_most.pl +++ b/src/backend/utils/mb/Unicode/UCS_to_most.pl @@ -50,7 +50,7 @@ my %filename = ( 'GBK' => 'CP936.TXT'); # make maps for all encodings if not specified -my @charsets = (scalar(@ARGV) > 0) ? @ARGV : keys(%filename); +my @charsets = (scalar(@ARGV) > 0) ? @ARGV : sort keys(%filename); foreach my $charset (@charsets) { |