544 |
=item join_subfields_with |
=item join_subfields_with |
545 |
|
|
546 |
Define delimiter which will be used to join repeatable subfields. You can |
Define delimiter which will be used to join repeatable subfields. You can |
547 |
specify option here instead in L</new> if you want to have per-record controll. |
specify option here instead in L</new> if you want to have per-record control. |
548 |
|
|
549 |
=back |
=back |
550 |
|
|
567 |
|
|
568 |
my $row = $self->fetch($mfn) || return; |
my $row = $self->fetch($mfn) || return; |
569 |
|
|
570 |
my $j_rs = $arg->{join_repeatable_subfields}; |
my $j_rs = $arg->{join_subfields_with}; |
571 |
$j_rs = $self->{join_repeatable_subfields} unless(defined($j_rs)); |
$j_rs = $self->{join_subfields_with} unless(defined($j_rs)); |
572 |
my $i_sf = $arg->{include_subfields}; |
my $i_sf = $arg->{include_subfields}; |
573 |
|
|
574 |
foreach my $f_nr (keys %{$row}) { |
foreach my $f_nr (keys %{$row}) { |