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

(-)a/C4/XISBN.pm (-1 lines)
Lines 107-113 sub get_xisbns { Link Here
107
        $unique_xisbns->{ $response_data->{content} }++;
107
        $unique_xisbns->{ $response_data->{content} }++;
108
        my $xbiblio= _get_biblio_from_xisbn($response_data->{content});
108
        my $xbiblio= _get_biblio_from_xisbn($response_data->{content});
109
        next unless $xbiblio;
109
        next unless $xbiblio;
110
        next if $xbiblio->{normalized_isbn} && $xbiblio->{normalized_isbn} eq $isbn;
111
        push @xisbns, $xbiblio if $xbiblio && $xbiblio->{biblionumber} ne $biblionumber;
110
        push @xisbns, $xbiblio if $xbiblio && $xbiblio->{biblionumber} ne $biblionumber;
112
    }
111
    }
113
    if ( wantarray ) {
112
    if ( wantarray ) {
(-)a/t/db_dependent/XISBN.t (-3 / +2 lines)
Lines 76-83 eval { $results_thingisbn = C4::XISBN::get_xisbns($isbn1,$biblionumber3); }; Link Here
76
SKIP: {
76
SKIP: {
77
    skip "Problem retrieving ThingISBN", 1
77
    skip "Problem retrieving ThingISBN", 1
78
        unless $@ eq '';
78
        unless $@ eq '';
79
    is( $results_thingisbn->[0]->{biblionumber},
79
    isnt( $results_thingisbn->[0]->{biblionumber},
80
        undef,
80
        $biblionumber3,
81
        "Doesn't get biblionumber if the biblionumber matches the one passed to the sub." );
81
        "Doesn't get biblionumber if the biblionumber matches the one passed to the sub." );
82
}
82
}
83
83
84
- 

Return to bug 26364