t/DataTables/Members.t

   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");