|
Lines 38-50
sub list {
Link Here
|
| 38 |
|
38 |
|
| 39 |
return try { |
39 |
return try { |
| 40 |
|
40 |
|
| 41 |
my $args = $c->validation->output; |
41 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
| 42 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
|
|
| 43 |
|
42 |
|
| 44 |
# FIXME Do we need more validation here? Don't think so we have the API specs. |
43 |
# FIXME Do we need more validation here? Don't think so we have the API specs. |
| 45 |
my ( $vendor_id, $package_id ) = split '-', |
44 |
my ( $vendor_id, $package_id ) = split '-', |
| 46 |
$c->validation->param('package_id') || q{}; |
45 |
$c->param('package_id') || q{}; |
| 47 |
my $title_id = $c->validation->param('title_id') || q{}; |
46 |
my $title_id = $c->param('title_id') || q{}; |
| 48 |
|
47 |
|
| 49 |
my $url = |
48 |
my $url = |
| 50 |
$title_id |
49 |
$title_id |
|
Lines 74-80
sub list {
Link Here
|
| 74 |
|
73 |
|
| 75 |
my $base_total = $result->{totalResults}; |
74 |
my $base_total = $result->{totalResults}; |
| 76 |
|
75 |
|
| 77 |
my ( $per_page, $page ) = $ebsco->build_query_pagination($args); |
76 |
my ( $per_page, $page ) = $ebsco->build_query_pagination( |
|
|
77 |
{ |
| 78 |
per_page => $c->stash('koha.pagination.per_page'), |
| 79 |
page => $c->stash('koha.pagination.page'), |
| 80 |
} |
| 81 |
); |
| 78 |
|
82 |
|
| 79 |
my $additional_params = $ebsco->build_additional_params( $c->req->params->to_hash ); |
83 |
my $additional_params = $ebsco->build_additional_params( $c->req->params->to_hash ); |
| 80 |
my $searchfield = 'titlename'; |
84 |
my $searchfield = 'titlename'; |
|
Lines 107-113
sub list {
Link Here
|
| 107 |
base_total => $base_total, |
111 |
base_total => $base_total, |
| 108 |
page => $page, |
112 |
page => $page, |
| 109 |
per_page => $per_page, |
113 |
per_page => $per_page, |
| 110 |
query_params => $args, |
|
|
| 111 |
total => $total, |
114 |
total => $total, |
| 112 |
} |
115 |
} |
| 113 |
); |
116 |
); |
|
Lines 127-133
sub get {
Link Here
|
| 127 |
|
130 |
|
| 128 |
return try { |
131 |
return try { |
| 129 |
my ( $vendor_id, $package_id, $resource_id ) = split '-', |
132 |
my ( $vendor_id, $package_id, $resource_id ) = split '-', |
| 130 |
$c->validation->param('resource_id'); |
133 |
$c->param('resource_id'); |
| 131 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
134 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
| 132 |
my $t = try { |
135 |
my $t = try { |
| 133 |
return $ebsco->request( GET => '/vendors/' |
136 |
return $ebsco->request( GET => '/vendors/' |
|
Lines 182-191
sub edit {
Link Here
|
| 182 |
my $c = shift or return; |
185 |
my $c = shift or return; |
| 183 |
|
186 |
|
| 184 |
return try { |
187 |
return try { |
| 185 |
my $body = $c->validation->param('body'); |
188 |
my $body = $c->req->json; |
| 186 |
my $is_selected = $body->{is_selected}; |
189 |
my $is_selected = $body->{is_selected}; |
| 187 |
my ( $vendor_id, $package_id, $resource_id ) = split '-', |
190 |
my ( $vendor_id, $package_id, $resource_id ) = split '-', |
| 188 |
$c->validation->param('resource_id'); |
191 |
$c->param('resource_id'); |
| 189 |
|
192 |
|
| 190 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
193 |
my $ebsco = Koha::ERM::Providers::EBSCO->new; |
| 191 |
my $t = try { |
194 |
my $t = try { |