Merge remote-tracking branch 'origin/new/bug_2780'
[koha_gimpoz] / C4 / External / BakerTaylor.pm
index 2ed01b6..7845811 100644 (file)
@@ -45,8 +45,7 @@ sub initialize {
        $user     = (@_ ? shift : C4::Context->preference('BakerTaylorUsername')    ) || ''; # LL17984
        $pass     = (@_ ? shift : C4::Context->preference('BakerTaylorPassword')    ) || ''; # CC82349
        $link_url = (@_ ? shift : C4::Context->preference('BakerTaylorBookstoreURL'));
-       # https://ocls.mylibrarybookstore.com/MLB/actions/searchHandler.do?nextPage=bookDetails&parentNum=10923&key=
-       $image_url = "http://contentcafe2.btol.com/buynow/Jacket.aspx?UserID=$user&Password=$pass&Product=";
+        $image_url = "http://contentcafe2.btol.com/ContentCafe/Jacket.aspx?UserID=$user&Password=$pass&Options=Y&Return=T&Type=S&Value=";
        $agent = "Koha/$VERSION [en] (Linux)";
                        #"Mozilla/4.76 [en] (Win98; U)",        #  if for some reason you want to go stealth, you might prefer this
 }
@@ -104,16 +103,21 @@ __END__
 
 =head1 NAME
 
-C4::External::BakerTaylor - Functions for retrieving content from Baker and Taylor, inventory availability and "Content Cafe".
+C4::External::BakerTaylor
+
+=head1 DESCRIPTION
+
+Functions for retrieving content from Baker and Taylor, inventory availability and "Content Cafe".
+
 The settings for this module are controlled by System Preferences:
 
 These can be overridden for testing purposes using the initialize function.
 
 =head1 FUNCTIONS
 
-=head1 availability($isbn);
+=head2 availability($isbn);
 
-=head2 $isbn is a isbn string
+$isbn is a isbn string
 
 =head1 NOTES