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

(-)a/C4/XISBN.pm (-4 / +4 lines)
Lines 84-90 sub get_xisbns { Link Here
84
    my ($response,$thing_response,$syndetics_response,$errors);
84
    my ($response,$thing_response,$syndetics_response,$errors);
85
    # THINGISBN
85
    # THINGISBN
86
    if ( C4::Context->preference('ThingISBN') ) {
86
    if ( C4::Context->preference('ThingISBN') ) {
87
        my $url = "http://www.librarything.com/api/thingISBN/".$isbn;
87
        my $url = "https://www.librarything.com/api/thingISBN/".$isbn;
88
        $thing_response = _get_url($url,'thingisbn');
88
        $thing_response = _get_url($url,'thingisbn');
89
    }
89
    }
90
90
Lines 120-127 sub get_xisbns { Link Here
120
sub _get_url {
120
sub _get_url {
121
    my ($url,$service_type) = @_;
121
    my ($url,$service_type) = @_;
122
    my $ua = LWP::UserAgent->new(
122
    my $ua = LWP::UserAgent->new(
123
        timeout => 2
123
        timeout => 2,
124
        );
124
        agent => "Mozilla/5.0"
125
    );
125
126
126
    my $response = $ua->get($url);
127
    my $response = $ua->get($url);
127
    if ($response->is_success) {
128
    if ($response->is_success) {
128
- 

Return to bug 34745