From 0fcef83b0dd4aab6726e5f381af4d12b3c361266 Mon Sep 17 00:00:00 2001 From: Domen Kožar Date: Wed, 10 Dec 2014 01:37:27 +0100 Subject: fix a bunch of perl modules --- .../MooseXAttributeHelpers-perl-5.20.patch | 33 ++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 pkgs/development/perl-modules/MooseXAttributeHelpers-perl-5.20.patch (limited to 'pkgs/development/perl-modules') diff --git a/pkgs/development/perl-modules/MooseXAttributeHelpers-perl-5.20.patch b/pkgs/development/perl-modules/MooseXAttributeHelpers-perl-5.20.patch new file mode 100644 index 000000000000..161f79a637be --- /dev/null +++ b/pkgs/development/perl-modules/MooseXAttributeHelpers-perl-5.20.patch @@ -0,0 +1,33 @@ +diff --git a/t/003_basic_hash.t b/t/003_basic_hash.t +index 1f842ae..c21ac52 100644 +--- a/t/003_basic_hash.t ++++ b/t/003_basic_hash.t +@@ -170,10 +170,10 @@ is_deeply($options->provides, { + is($options->type_constraint->type_parameter, 'Str', '... got the right container type'); + + $stuff->set_option( oink => "blah", xxy => "flop" ); +-my @key_value = $stuff->key_value; ++my @key_value = sort{ $a->[0] cmp $b->[0] } $stuff->key_value; + is_deeply( + \@key_value, +- [ [ 'xxy', 'flop' ], [ 'quantity', 4 ], [ 'oink', 'blah' ] ], ++ [ sort{ $a->[0] cmp $b->[0] } [ 'xxy', 'flop' ], [ 'quantity', 4 ], [ 'oink', 'blah' ] ], + '... got the right key value pairs' + ); + +diff --git a/t/203_trait_hash.t b/t/203_trait_hash.t +index 8e876b1..451c0bb 100644 +--- a/t/203_trait_hash.t ++++ b/t/203_trait_hash.t +@@ -156,10 +156,10 @@ is_deeply($options->provides, { + is($options->type_constraint->type_parameter, 'Str', '... got the right container type'); + + $stuff->set_option( oink => "blah", xxy => "flop" ); +-my @key_value = $stuff->key_value; ++my @key_value = sort{ $a->[0] cmp $b->[0] } $stuff->key_value; + is_deeply( + \@key_value, +- [ [ 'xxy', 'flop' ], [ 'quantity', 4 ], [ 'oink', 'blah' ] ], ++ [ sort{ $a->[0] cmp $b->[0] } [ 'xxy', 'flop' ], [ 'quantity', 4 ], [ 'oink', 'blah' ] ], + '... got the right key value pairs' + ); -- cgit 1.4.1