Lines 1-14
Link Here
|
1 |
use Modern::Perl; |
|
|
2 |
use Test::More tests => 4; |
3 |
|
4 |
use_ok( "C4::Utils::DataTables::Members" ); |
5 |
|
6 |
my $patrons = C4::Utils::DataTables::Members::search({ |
7 |
searchmember => "Doe", |
8 |
searchfieldstype => 'standard', |
9 |
searchtype => 'contain' |
10 |
}); |
11 |
|
12 |
isnt( $patrons->{iTotalDisplayRecords}, undef, "The iTotalDisplayRecords key is defined"); |
13 |
isnt( $patrons->{iTotalRecords}, undef, "The iTotalRecords key is defined"); |
14 |
is( ref $patrons->{patrons}, 'ARRAY', "The patrons key is an arrayref"); |
15 |
- |