Browse Source

Bug 12918: fix failing test case

A bug in a test case causes test case failure. It also required a
database, so I'm moving it out of the way.

Test plan:
1) prove -v t/db_dependent/Templates.t
   -- bombs!
2) apply patch
3) prove -v t/db_dependent/Templates.t
   -- works!

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
Good catch Robin, it didn't fail in Perl 5.18 so didn't notice the mistake.

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
MM-OPAC/theme_dep
Robin Sheat 8 years ago
committed by Tomas Cohen Arazi
parent
commit
8a63c17f79
  1. 2
      t/db_dependent/Templates.t

2
t/Templates.t → t/db_dependent/Templates.t

@ -40,7 +40,7 @@ my $columns = C4::Templates::GetColumnDefs( $query );
is( ref( $columns ) eq 'HASH', 1, 'GetColumnDefs returns a hashref' );
# get the tables names, sorted
my @keys = sort keys $columns;
my @keys = sort keys %$columns;
is( scalar @keys, 5, "GetColumnDefs correctly returns the 5 tables defined in columns.def" );
my @tables = ( 'biblio', 'biblioitems', 'borrowers', 'items', 'statistics');
cmp_deeply( \@keys, \@tables, "GetColumnDefs returns the expected tables");
Loading…
Cancel
Save