[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.26,1.27

[Paul POULAIN]

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1:/tmp/cvs-serv16203/acqui.simple

Modified Files:
        addbiblio.pl 
Log Message:
improvments/fixes for z3950 support.
* Works now even on ADD, not only on MODIFY
* able to search on ISBN, author, title

Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -r1.26 -r1.27
*** addbiblio.pl        21 May 2003 14:35:36 -0000      1.26
--- addbiblio.pl        17 Jun 2003 11:21:13 -0000      1.27
***************
*** 191,194 ****
--- 191,195 ----
                                        
$subfield_data{mandatory}=$tagslib->{$tag}->{$subfield}->{mandatory};
                                        
$subfield_data{repeatable}=$tagslib->{$tag}->{$subfield}->{repeatable};
+                                       
$subfield_data{kohafield}=$tagslib->{$tag}->{$subfield}->{kohafield};
                                        $value=char_decode($value) unless 
($is_a_modif);
                                        $indicator = $x if $x; #XXX
***************
*** 221,224 ****
--- 222,226 ----
                                        
$subfield_data{mandatory}=$tagslib->{$tag}->{$subfield}->{mandatory};
                                        
$subfield_data{repeatable}=$tagslib->{$tag}->{$subfield}->{repeatable};
+                                       
$subfield_data{kohafield}=$tagslib->{$tag}->{$subfield}->{kohafield};
                                        if 
($tagslib->{$tag}->{$subfield}->{authorised_value}) {
                                                $subfield_data{marc_value}= 
build_authorized_values_list($tag, $subfield, $value, $dbh, 
$authorised_values_sth);