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

(-)a/opac/svc/overdrive_proxy (-5 / +7 lines)
Lines 35-41 JS side from having to deal with cross-origin/authentication issues. Link Here
35
use strict;
35
use strict;
36
use warnings;
36
use warnings;
37
37
38
use CGI qw(-oldstyle_urls -utf8);
38
use CGI qw( -utf8);
39
use JSON;
39
use JSON;
40
40
41
use C4::Context;
41
use C4::Context;
Lines 46-53 use Koha; Link Here
46
46
47
my $query = new CGI;
47
my $query = new CGI;
48
48
49
my $token;
50
51
if ( !IsOverDriveEnabled() || !( $token = GetOverDriveToken() ) ) {
49
if ( !IsOverDriveEnabled() || !( $token = GetOverDriveToken() ) ) {
52
    print $query->header(
50
    print $query->header(
53
        -status => '400 Bad Request',
51
        -status => '400 Bad Request',
Lines 61-67 if ( !IsOverDriveEnabled() || !( $token = GetOverDriveToken() ) ) { Link Here
61
    exit;
59
    exit;
62
}
60
}
63
61
64
my $request = HTTP::Request::Common::GET( "https://api.overdrive.com/v1" . $query->path_info . '?' . $query->query_string );
62
my $token;
63
my $q = $query->param('q');
64
my $limit = $query->param('limit');
65
my $offset = $query->param('offset');
66
67
my $request = HTTP::Request::Common::GET( "https://api.overdrive.com/v1?q=" . $q . "&limit=" . $limit . "&offset=".$offset);
65
$request->header( Authorization => $token );
68
$request->header( Authorization => $token );
66
69
67
my $ua = LWP::UserAgent->new( "Koha " . Koha::version() );
70
my $ua = LWP::UserAgent->new( "Koha " . Koha::version() );
68
- 

Return to bug 17392