Lines 40-45
use Koha::RecordProcessor;
Link Here
|
40 |
|
40 |
|
41 |
use constant ANYONE => 2; |
41 |
use constant ANYONE => 2; |
42 |
|
42 |
|
|
|
43 |
BEGIN { |
44 |
if (C4::Context->preference('BakerTaylorEnabled')) { |
45 |
require C4::External::BakerTaylor; |
46 |
import C4::External::BakerTaylor qw(&image_url &link_url); |
47 |
} |
48 |
} |
49 |
|
43 |
my $query = new CGI; |
50 |
my $query = new CGI; |
44 |
|
51 |
|
45 |
my $template_name = $query->param('rss') ? "opac-shelves-rss.tt" : "opac-shelves.tt"; |
52 |
my $template_name = $query->param('rss') ? "opac-shelves-rss.tt" : "opac-shelves.tt"; |
Lines 69-74
if( $op eq 'view' || $op eq 'list' ){
Link Here
|
69 |
}); |
76 |
}); |
70 |
} |
77 |
} |
71 |
|
78 |
|
|
|
79 |
if (C4::Context->preference("BakerTaylorEnabled")) { |
80 |
$template->param( |
81 |
BakerTaylorImageURL => &image_url(), |
82 |
BakerTaylorLinkURL => &link_url(), |
83 |
); |
84 |
} |
85 |
|
72 |
my $referer = $query->param('referer') || $op; |
86 |
my $referer = $query->param('referer') || $op; |
73 |
my $category = $query->param('category') || 1; |
87 |
my $category = $query->param('category') || 1; |
74 |
my ( $shelf, $shelfnumber, @messages ); |
88 |
my ( $shelf, $shelfnumber, @messages ); |
75 |
- |
|
|