package KohaTest::Members; use base qw( KohaTest ); use strict; use warnings; use Test::More; use C4::Members; sub testing_class { 'C4::Members' }; sub methods : Test( 1 ) { my $self = shift; my @methods = qw( SearchMember GetMemberDetails patronflags GetMember GetMemberIssuesAndFines ModMember AddMember Check_Userid changepassword fixup_cardnumber GetGuarantees UpdateGuarantees GetPendingIssues GetAllIssues GetMemberAccountRecords GetBorNotifyAcctRecord checkuniquemember checkcardnumber getzipnamecity getidcity GetExpiryDate checkuserpassword GetborCatFromCatType GetBorrowercategory ethnicitycategories fixEthnicity GetAge get_institutions add_member_orgs GetCities GetSortDetails MoveMemberToDeleted DelMember ExtendMemberSubscriptionTo GetRoadTypes GetTitles GetPatronImage PutPatronImage RmPatronImage GetRoadTypeDetails GetBorrowersWhoHaveNotBorrowedSince GetBorrowersWhoHaveNeverBorrowed GetBorrowersWithIssuesHistoryOlderThan GetBorrowersNamesAndLatestIssue ); can_ok( $self->testing_class, @methods ); } 1;