bugfix : when modifying a biblio, on a repeated field with many subfields, the test...

Example :
606 has $a$x$z

1st is 606$a (so $x$z empty)
2nd is 606$a$x

The marc editor in the 2nd field showed before this fix :
606 $a a_value
   $x another_value
   $x
   $z
(the 2nd $x being useless

diff --git a/acqui.simple/addbiblio.pl b/acqui.simple/addbiblio.pl
index 8329185..f736192 100755 (executable)
--- a/acqui.simple/addbiblio.pl
+++ b/acqui.simple/addbiblio.pl
@@ -240,7 +240,7 @@ sub build_tabs ($$$$) {
                                                next if (length $subfield !=1);
                                                next if ($tagslib->{$tag}->{$subfield}->{tab} ne $tabloop);
                                                next if ($tag<10);
-                                               next if (defined($record->field($tag)->subfield($subfield)));
+                                               next if (defined($field->subfield($subfield)));
                                                push(@subfields_data, &create_input($tag,$subfield,'',$i,$tabloop,$record,$authorised_values_sth));
                                                $i++;
                                        }