diff options
| author | Ilya Martynov <ilya@martynov.org> | 2003-09-05 04:33:46 +0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-09-04 19:34:26 +0000 |
| commit | fec5e1eb396a5ed15ea5ee0c269e61721c3e028b (patch) | |
| tree | a0facf4dfde7cdc4ee4cb9616e41acf7ab06a545 /ext/Data/Dumper/Dumper.pm | |
| parent | 36ed8aee3cc709797cb70c10337a8023a3385cd0 (diff) | |
| download | perl-fec5e1eb396a5ed15ea5ee0c269e61721c3e028b.tar.gz | |
Re: [PATCH] Data::Dumper 2.121
Message-ID: <87ad9kuwd1.fsf@abra.ru>
p4raw-id: //depot/perl@21036
Diffstat (limited to 'ext/Data/Dumper/Dumper.pm')
| -rw-r--r-- | ext/Data/Dumper/Dumper.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/ext/Data/Dumper/Dumper.pm b/ext/Data/Dumper/Dumper.pm index 9d11c64ba4..176038174f 100644 --- a/ext/Data/Dumper/Dumper.pm +++ b/ext/Data/Dumper/Dumper.pm @@ -645,6 +645,10 @@ sub qquote { return qq("$_"); } +# helper sub to sort hash keys in Perl < 5.8.0 where we don't have +# access to sortsv() from XS +sub _sortkeys { [ sort keys %{$_[0]} ] } + 1; __END__ @@ -1193,6 +1197,9 @@ XSUB implementation does not support them. SCALAR objects have the weirdest looking C<bless> workaround. +Pure Perl version of C<Data::Dumper> escapes UTF-8 strings correctly +only in Perl 5.8.0 and later. + =head2 NOTE Starting from Perl 5.8.1 different runs of Perl will have different @@ -1215,7 +1222,7 @@ modify it under the same terms as Perl itself. =head1 VERSION -Version 2.12 (unreleased) +Version 2.121 (Aug 24 2003) =head1 SEE ALSO |