|
Lines 1515-1521
sub merge {
Link Here
|
| 1515 |
# BulkEdit marc records |
1515 |
# BulkEdit marc records |
| 1516 |
# May be used as a template for a bulkedit field |
1516 |
# May be used as a template for a bulkedit field |
| 1517 |
foreach my $marcrecord(@reccache){ |
1517 |
foreach my $marcrecord(@reccache){ |
| 1518 |
my $update; |
1518 |
my $update = 0; |
| 1519 |
foreach my $tagfield (@tags_using_authtype){ |
1519 |
foreach my $tagfield (@tags_using_authtype){ |
| 1520 |
# warn "tagfield : $tagfield "; |
1520 |
# warn "tagfield : $tagfield "; |
| 1521 |
foreach my $field ($marcrecord->field($tagfield)){ |
1521 |
foreach my $field ($marcrecord->field($tagfield)){ |
| 1522 |
- |
|
|