ok( !defined $ret, 'UpdateTotalIssues returns carped warning if biblio record does not exist');
-1;
run_tests('NORMARC');
};
-1;
'Invalid boolean (reference) raises warning';
is( $result, undef, 'recognizes a reference as not a boolean' );
-1;
is ( $cal->is_holiday($holiday_for_another_branch), 1, 'Holiday defined for CPL should be defined as an holiday' );
}
-1;
'SetUTF8Flag sets the UTF-8 flag to all subfields' );
is( nsb_clean("\98Le\9c Moyen Âge"), "Le Moyen Âge", "nsb_clean removes \98 and \9c" );
-
-1;
# ~ T, P or X followed by numeric characters
# ~ No checkdigit
-1;
is( $imagenumbers[4], undef, 'imagenumber undef' );
-1;
is($issns[0], 'abc', 'Original ISSN passed through even if invalid');
is(scalar(@issns), 1, 'zero additional variations returned of invalid ISSN');
-1;
is( $result, undef, 'Returns undef on error confition' );
};
-1;
'The \'lower_case\' normalizer only makes characters lower-case' );
};
-1;
is( $metadata_record, undef, 'record object mandatory')
};
-1;
$letter = C4::Letters::_parseletter( undef, 'reserves', {waitingdate => "2013-01-01"} );
is( ref($letter), 'HASH');
-1;
return $matchpoint;
}
-1;
is( $patron->privacy, '667789', 'privacy field set ok' );
};
-1;
'verify_cksum prints the expected warning for an invalid checksum';
is($invalidTest, 0, "Checksum: 1234567 is invalid as expected");
-1;
});
is( $send_sms, 1, 'send_sms returns 1' );
-1;
is( $report->{'without'}->[0]->{'isbn'}, '9780596526740',
'testing get_report' );
-1;
my $sysprefs_xml = C4::XSLT::get_xslt_sysprefs();
ok( $sysprefs_xml =~ m/$matching_string/, 'singleBranchMode has a value of 0');
-1;
$schema->storage->txn_rollback();
-1;
$schema->storage->txn_rollback;
-1;
is( $moved, $biblionumber, 'Found in deletedbiblio_metadata' );
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
is( Koha::Checkouts->find( $issue_id )->issue_id, $issue_id, 'The issues entry should not have been removed' );
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$dbh->do(q|DELETE FROM issuingrules|);
}
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
is( $club->club_enrollments->count, 1, 'There is 1 enrollment for club' );
$schema->storage->txn_rollback();
-1;
$version =~ s/XXX$/999/;
return $version;
}
-1;
ok( !$needsconfirmation->{HIGHHOLDS}, "High holds checkout does not need confirmation" );
$schema->storage->txn_rollback();
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback();
};
-1;
$schema->storage->txn_rollback();
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback();
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback();
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
is( Koha::LibraryCategories->search->count, $nb_of_categories + 2, 'Delete should have deleted the library category' );
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
};
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
};
-1;
$schema->storage->txn_rollback;
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
return scalar( @{ C4::Log::GetLogs( undef, undef, undef, ['MEMBERS'] ) } );
}
-1;
$schema->storage->txn_rollback;
};
-1;
$schema->storage->txn_rollback;
-1;
is( int(Koha::Ratings->search( { biblionumber => $biblionumber } )->get_avg_rating), 0, 'get_avg_rating should return 0 if no rating exist' );
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
};
-
-1;
$schema->storage->txn_rollback;
};
-
-1;
'holdingbranch not added to facets if DisplayLibraryFacets=home' );
};
-1;
my $del_results = $updated_layout->delete();
ok( ! defined($del_results) , "Layout->delete() success");
-1;
my $del_results = $updated_profile->delete();
ok($del_results ne -1, "Profile->delete() success");
-1;
my $del_results = $updated_template->delete();
ok($del_results ne -1, "Template->delete() success");
-1;
$schema->storage->txn_begin;
-1;
$schema->storage->txn_begin;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback();
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback();
-1;
return $default_search_class;
}
-1;
$schema->storage->txn_rollback;
};
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
#End transaction
$dbh->rollback;
-1;
is( C4::SIP::SIPServer::get_timeout( $server, { transport => 1 } ), 30, "Fallback again" );
};
-1;
# Make sure that following tests are not using our config settings
Koha::Caches->get_instance('config')->flush_all;
-1;
$schema->storage->txn_rollback;
-1;
$schema->storage->txn_rollback;
-1;
is( $template ? $template->output: '', '', 'Check output' );
};
-1;
return $biblionumber;
}
-1;
return ( $user->{borrowernumber}, $session->id );
}
-1;
ok($id_to_del2 ne undef, "error, link to delete not working");
}
-1;
$jsonresponse = decode_json $agent->content;
is( $jsonresponse->{ aaData }[0]->{ status }, 'reverted', 'record marked as reverted' );
-1;
like( $history_page, qr/$encoded_latin_name/, "Latin characters with umlauts show correctly on the history page." );
like( $history_page, qr/$encoded_cyrillic_name/, "Cyrillic characters with umlauts show correctly on the history page." );
-1;