[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.32,1.33

[Paul POULAIN]

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

Modified Files:
        addbiblio.pl 
Log Message:
sync'ing with rel_2_0 (mostly prepare/execute pb, bug #662)

Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.32
retrieving revision 1.33
diff -C2 -r1.32 -r1.33
*** addbiblio.pl        6 Nov 2003 17:18:31 -0000       1.32
--- addbiblio.pl        22 Dec 2003 19:16:58 -0000      1.33
***************
*** 231,235 ****
                                                next if 
subfield_is_koha_internal_p($subfield);
                                                next if 
($tagslib->{$tag}->{$subfield}->{tab} ne $tabloop);
!                                               next if 
(defined($record->field($tag)->subfield($subfield)));
                                                push(@subfields_data, 
&create_input($tag,$subfield,'',$i,$tabloop,$record,$authorised_values_sth));
                                                $i++;
--- 231,236 ----
                                                next if 
subfield_is_koha_internal_p($subfield);
                                                next if 
($tagslib->{$tag}->{$subfield}->{tab} ne $tabloop);
!                                               next if ($tag > 10 && 
defined($record->field($tag)->subfield($subfield)));
!                                               next if ($tag < 10 && 
defined($record->field($tag)->data()));
                                                push(@subfields_data, 
&create_input($tag,$subfield,'',$i,$tabloop,$record,$authorised_values_sth));
                                                $i++;