From 0b00d1d43a47585e5207fa60438a1c662528f249 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Thu, 20 Mar 2014 19:38:31 -0700 Subject: [PATCH] sort keys before dumping them --- t/test_spool/versions/indices/dump_stub_from_index.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/t/test_spool/versions/indices/dump_stub_from_index.pl b/t/test_spool/versions/indices/dump_stub_from_index.pl index f81e177..1fa1a3d 100755 --- a/t/test_spool/versions/indices/dump_stub_from_index.pl +++ b/t/test_spool/versions/indices/dump_stub_from_index.pl @@ -52,11 +52,14 @@ dump_stub_from_index.pl use vars qw($DEBUG); use MLDBM qw(DB_File Storable); +# Use the portable dump method +$MLDBM::DumpMeth=q(portable); use Data::Dumper; +# sort Data::Dumper keys +$Data::Dumper::Sortkeys=1; use Fcntl; use File::Basename; -$MLDBM::DumpMeth=q(portable); my %options = (debug => 0, help => 0, -- 2.39.2