1
From: Ansgar Burchardt <ansgar@43-1.org>
2
Date: Sun, 06 Jun 2010 21:40:08 +0900
4
Subject: Use is_deeply correctly
6
--- libmodule-info-perl.orig/t/Module-Info.t
7
+++ libmodule-info-perl/t/Module-Info.t
9
$module = Module::Info->new_from_file('t/lib/Bar.pm');
10
@mods = $module->modules_used;
11
is( @mods, 3, 'modules_used with complex BEGIN block' );
12
- is_deeply( sort @mods,
13
- (sort qw(Cwd Carp strict)) );
14
+ is_deeply( [sort @mods],
15
+ [sort qw(Cwd Carp strict)] );