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

(-)a/C4/External/Syndetics.pm (-1 / +3 lines)
Lines 66-71 sub get_syndetics_index { Link Here
66 
    my ( $isbn,$upc,$oclc ) = @_;
 66 
    my ( $isbn,$upc,$oclc ) = @_;
67 

          67
          

        

        

          68
          
    my $response = _fetch_syndetics_content('INDEX.XML', $isbn, $upc, $oclc);

          68
          
    my $response = _fetch_syndetics_content('INDEX.XML', $isbn, $upc, $oclc);

        

            

              
              
              69
              
    unless ($response->content_type =~ /xml/) {

            

            

              70
              
        return;

            

            

              71
              
    }  

            

        

          69
          

          72
          

        

        

          70
          
    my $content = $response->content;

          73
          
    my $content = $response->content;

        

        

          71
          
    my $xmlsimple = XML::Simple->new();

          74
          
    my $xmlsimple = XML::Simple->new();

        

            

              72
              
- 

              
              
            






  

  Return to bug 12858