@@ -, +, @@
---
C4/ShelfBrowser.pm | 31 +++++++++-------------
.../bootstrap/en/includes/shelfbrowser.inc | 4 +++
2 files changed, 16 insertions(+), 19 deletions(-)
--- a/C4/ShelfBrowser.pm
+++ a/C4/ShelfBrowser.pm
@@ -25,6 +25,7 @@ use warnings;
use C4::Biblio;
use C4::Context;
use C4::Koha;
+use Koha::Biblios;
use Koha::Libraries;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@@ -220,14 +221,17 @@ sub GetShelfInfo {
my $marcflavour = C4::Context->preference("marcflavour");
my @valid_items;
for my $item ( @items ) {
- my $this_biblio = GetBibData($item->{biblionumber});
- next unless defined $this_biblio;
- $item->{'title'} = $this_biblio->{'title'};
- $item->{'subtitle'} = $this_biblio->{'subtitle'},
- $item->{'medium'} = $this_biblio->{'medium'};
- $item->{'part_number'} = $this_biblio->{'part_number'};
- $item->{'part_name'} = $this_biblio->{'part_name'};
- my $this_record = GetMarcBiblio({ biblionumber => $this_biblio->{'biblionumber'} });
+ my $biblio = Koha::Biblios->find( $item->{biblionumber} );
+ next unless defined $biblio;
+
+ $item->{biblio_object} = $biblio;
+ $item->{biblionumber} = $biblio->biblionumber;
+ $item->{title} = $biblio->title;
+ $item->{subtitle} = $biblio->subtitle;
+ $item->{medium} = $biblio->medium;
+ $item->{part_number} = $biblio->part_number;
+ $item->{part_name} = $biblio->part_name;
+ my $this_record = GetMarcBiblio({ biblionumber => $biblio->biblionumber });
$item->{'browser_normalized_upc'} = GetNormalizedUPC($this_record,$marcflavour);
$item->{'browser_normalized_oclc'} = GetNormalizedOCLCNumber($this_record,$marcflavour);
$item->{'browser_normalized_isbn'} = GetNormalizedISBN(undef,$this_record,$marcflavour);
@@ -237,15 +241,4 @@ sub GetShelfInfo {
return @valid_items;
}
-# Fetches some basic biblio data needed by the shelf stuff
-sub GetBibData {
- my ($bibnum) = @_;
-
- my $dbh = C4::Context->dbh;
- my $sth = $dbh->prepare("SELECT biblionumber, title, subtitle, medium, part_number, part_name FROM biblio WHERE biblionumber=?");
- $sth->execute($bibnum);
- my $bib = $sth->fetchrow_hashref();
- return $bib;
-}
-
1;
--- a/koha-tmpl/opac-tmpl/bootstrap/en/includes/shelfbrowser.inc
+++ a/koha-tmpl/opac-tmpl/bootstrap/en/includes/shelfbrowser.inc
@@ -61,6 +61,10 @@
No cover image available
[% END %]
[% END %]
+ [% IF Koha.Preference('OPACCustomCoverImages') AND Koha.Preference('CustomCoverImagesURL') %]
+
+ [% END %]
+
[% END %]
--