View | Details | Raw Unified | Return to bug 17600
Collapse All | Expand All

(-)a/Koha/List/Patron.pm (-5 / +7 lines)
Lines 31-39 use Carp qw( carp croak ); Link Here
31
31
32
use Koha::Database;
32
use Koha::Database;
33
33
34
use base 'Exporter';
34
our (@ISA, @EXPORT_OK);
35
our @EXPORT = (
35
BEGIN {
36
    qw(
36
    require Exporter;
37
    @ISA    = qw(Exporter);
38
    @EXPORT = qw(
37
      GetPatronLists
39
      GetPatronLists
38
40
39
      DelPatronList
41
      DelPatronList
Lines 42-49 our @EXPORT = ( Link Here
42
44
43
      AddPatronsToList
45
      AddPatronsToList
44
      DelPatronsFromList
46
      DelPatronsFromList
45
      )
47
    );
46
);
48
}
47
49
48
=head2 GetPatronLists
50
=head2 GetPatronLists
49
51
(-)a/svc/bib (-2 / +2 lines)
Lines 22-29 Link Here
22
use Modern::Perl;
22
use Modern::Perl;
23
23
24
use CGI qw ( -utf8 );
24
use CGI qw ( -utf8 );
25
use C4::Auth qw/check_api_auth/;
25
use C4::Auth qw( check_api_auth );
26
use C4::Biblio;
26
use C4::Biblio qw( GetFrameworkCode );
27
use C4::Items;
27
use C4::Items;
28
use XML::Simple;
28
use XML::Simple;
29
29
(-)a/svc/checkin (-1 / +1 lines)
Lines 23-29 use Modern::Perl; Link Here
23
use CGI;
23
use CGI;
24
use JSON qw(to_json);
24
use JSON qw(to_json);
25
25
26
use C4::Circulation;
26
use C4::Circulation qw( AddReturn );
27
use C4::Context;
27
use C4::Context;
28
use C4::Auth qw(check_cookie_auth);
28
use C4::Auth qw(check_cookie_auth);
29
use Koha::Checkouts;
29
use Koha::Checkouts;
(-)a/svc/import_bib (-1 / +1 lines)
Lines 23-29 use Modern::Perl; Link Here
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
24
use C4::Auth qw/check_api_auth/;
24
use C4::Auth qw/check_api_auth/;
25
use C4::Context;
25
use C4::Context;
26
use C4::ImportBatch;
26
use C4::ImportBatch qw( GetWebserviceBatchId AddBiblioToBatch AddItemsToImportBiblio BatchFindDuplicates BatchCommitRecords );
27
use C4::Matcher;
27
use C4::Matcher;
28
use XML::Simple;
28
use XML::Simple;
29
# use Carp::Always;
29
# use Carp::Always;
(-)a/svc/members/add_to_list (-1 / +1 lines)
Lines 22-28 use CGI; Link Here
22
22
23
use C4::Auth qw( check_cookie_auth );
23
use C4::Auth qw( check_cookie_auth );
24
use JSON qw( to_json );
24
use JSON qw( to_json );
25
use Koha::List::Patron;
25
use Koha::List::Patron qw( AddPatronList GetPatronLists AddPatronsToList );
26
26
27
my $input = CGI->new;
27
my $input = CGI->new;
28
28
(-)a/svc/renew (-1 / +1 lines)
Lines 23-29 use CGI; Link Here
23
use JSON qw(to_json);
23
use JSON qw(to_json);
24
use Try::Tiny;
24
use Try::Tiny;
25
25
26
use C4::Circulation;
26
use C4::Circulation qw( AddRenewal CanBookBeRenewed );
27
use C4::Context;
27
use C4::Context;
28
use C4::Auth qw(check_cookie_auth);
28
use C4::Auth qw(check_cookie_auth);
29
29
(-)a/svc/report (-2 / +1 lines)
Lines 23-29 use Modern::Perl; Link Here
23
use C4::Auth qw( get_template_and_user );
23
use C4::Auth qw( get_template_and_user );
24
use C4::Reports::Guided qw( execute_query );
24
use C4::Reports::Guided qw( execute_query );
25
use Koha::Reports;
25
use Koha::Reports;
26
use JSON;
26
use JSON qw( encode_json decode_json );
27
use CGI qw ( -utf8 );
27
use CGI qw ( -utf8 );
28
28
29
use Koha::Caches;
29
use Koha::Caches;
30
- 

Return to bug 17600