8 given => [ { a => 1 }, { b => 1 } ],
\r
9 expects => { a => 1, b => 1 }
\r
12 given => [ { a => 1 }, { a => { b => 1 } } ],
\r
13 expects => { a => { b => 1 } }
\r
16 given => [ { a => { b => 1 } }, { a => 1 } ],
\r
17 expects => { a => 1 }
\r
20 given => [ { a => 1 }, { a => [ 1 ] } ],
\r
21 expects => { a => [ 1 ] }
\r
24 given => [ { a => [ 1 ] }, { a => 1 } ],
\r
25 expects => { a => 1 }
\r
28 given => [ { a => { b => 1 } }, { a => { b => 2 } } ],
\r
29 expects => { a => { b => 2 } }
\r
32 given => [ { a => { b => 1 } }, { a => { c => 1 } } ],
\r
33 expects => { a => { b => 1, c => 1 } }
\r
37 plan tests => scalar @tests + 1;
41 for my $test ( @ tests ) {
\r
42 is_deeply( Catalyst->merge_config_hashes( @{ $test->{ given } } ), $test->{ expects } );
\r