reintroducing an important line in TransformeMarcToKoha

Signed-off-by: Chris Cormack <crc@liblime.com>

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index 48c5056..38b5a39 100644 (file)
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -2298,6 +2298,7 @@ sub TransformMarcToKoha {
           &TransformMarcToKohaOneField( "biblio", $field, $record, $result,
             $frameworkcode );
     }
+    my $sth2 = $dbh->prepare("SHOW COLUMNS from biblioitems");
     $sth2->execute;
     while ( ($field) = $sth2->fetchrow ) {
         if ( $field eq 'notes' ) { $field = 'bnotes'; }

diff --git a/C4/Search.pm b/C4/Search.pm
index 26372e8..e6cecd3 100755 (executable)
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -860,9 +860,7 @@ sub searchResults {
     for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) {
         my $marcrecord;
         $marcrecord = MARC::File::USMARC::decode( $marcresults[$i] );
-
         my $oldbiblio = TransformMarcToKoha( $dbh, $marcrecord, '' );
-
         # add image url if there is one
         if ( $itemtypes{ $oldbiblio->{itemtype} }->{imageurl} =~ /^http:/ ) {
             $oldbiblio->{imageurl} =