Teach Syndetic.pm to pass UPC in requests
authorJeff Godin <jgodin@tadl.org>
Sat, 28 Apr 2012 21:24:06 +0000 (17:24 -0400)
committerBen Shum <bshum@biblio.org>
Wed, 12 Dec 2012 15:50:36 +0000 (10:50 -0500)
Teach OpenILS::WWW::AddedContent::Syndetic to pass UPC when
requesting added content from the source.

Signed-off-by: Jeff Godin <jgodin@tadl.org>
Open-ILS/src/perlmods/lib/OpenILS/WWW/AddedContent/Syndetic.pm

index 0c38770..8226d72 100644 (file)
@@ -268,7 +268,7 @@ sub fetch_response {
     my $isbn = $keys->{isbn}[0];
     my $upc = $keys->{upc}[0];
 
-    my $url = $self->base_url . "?isbn=$isbn/$page&client=$uname" . (($notype) ? '' : "&type=rw12");
+    my $url = $self->base_url . "?isbn=$isbn/$page&upc=$upc&client=$uname" . (($notype) ? '' : "&type=rw12");
     return $AC->get_url($url);
 }