t/db_dependent/lib/KohaTest/Members.pm

   1 package KohaTest::Members;
   2 use base qw( KohaTest );
   3
   4 use strict;
   5 use warnings;
   6
   7 use Test::More;
   8
   9 use C4::Members;
  10 sub testing_class { 'C4::Members' };
  11
  12
  13 sub methods : Test( 1 ) {
  14     my $self = shift;
  15     my @methods = qw( Search
  16                       GetMemberDetails
  17                       patronflags
  18                       GetMember
  19                       GetMemberIssuesAndFines
  20                       ModMember
  21                       AddMember
  22                       Check_Userid
  23                       changepassword
  24                       fixup_cardnumber
  25                       GetGuarantees
  26                       UpdateGuarantees
  27                       GetPendingIssues
  28                       GetAllIssues
  29                       GetMemberAccountRecords
  30                       GetBorNotifyAcctRecord
  31                       checkuniquemember
  32                       checkcardnumber
  33                       getzipnamecity
  34                       getidcity
  35                       GetExpiryDate
  36                       checkuserpassword
  37                       GetborCatFromCatType
  38                       GetBorrowercategory
  39                       ethnicitycategories
  40                       fixEthnicity
  41                       GetAge
  42                       get_institutions
  43                       add_member_orgs
  44                       MoveMemberToDeleted
  45                       DelMember
  46                       ExtendMemberSubscriptionTo
  47                       GetTitles
  48                       GetPatronImage
  49                       PutPatronImage
  50                       RmPatronImage
  51                       GetBorrowersWhoHaveNotBorrowedSince
  52                       GetBorrowersWhoHaveNeverBorrowed
  53                       GetBorrowersWithIssuesHistoryOlderThan
  54                       GetBorrowersNamesAndLatestIssue
  55                       IssueSlip
  56                 );
  57
  58     can_ok( $self->testing_class, @methods );
  59 }
  60
  61 1;
  62