gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(bug #3592) fix scan of terms 

Signed-off-by: Henri-Damien LAURENT <henridamien.laurent@biblibre.com>
This commit is contained in:
Henri-Damien LAURENT 2009-09-21 22:39:49 +02:00
parent a2743f4cf0
commit 185ff3d26a
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
C4/Search.pm
View File

@ -1392,16 +1392,19 @@ sub searchResults {
# We get the biblionumber position in MARC
my ($bibliotag,$bibliosubf)=GetMarcFromKohaField('biblio.biblionumber','');
my $fw;
my $fw = '';
# loop through all of the records we've retrieved
for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) {
my $marcrecord = MARC::File::USMARC::decode( $marcresults[$i] );
if ($bibliotag<10){
$fw = GetFrameworkCode($marcrecord->field($bibliotag)->data);
}else{
$fw = GetFrameworkCode($marcrecord->subfield($bibliotag,$bibliosubf));
if(not $scan){
if ($bibliotag<10){
$biblionumber = $marcrecord->field($bibliotag)->data;
}else{
$biblionumber = $marcrecord->subfield($bibliotag,$bibliosubf);
}
$fw = GetFrameworkCode($biblionumber);
}
my $oldbiblio = TransformMarcToKoha( $dbh, $marcrecord, $fw );