Only split the expression a=b on the first = sign.
Tested with the very unlikely z=x=1 :)
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
for my $in ( @received_items ) {
my $item = C4::Items::GetMarcItem( $biblionumber, $in );
for my $affect ( @affects ) {
for my $in ( @received_items ) {
my $item = C4::Items::GetMarcItem( $biblionumber, $in );
for my $affect ( @affects ) {
- my ( $sf, $v ) = split q{=}, $affect;
+ my ( $sf, $v ) = split q{=}, $affect, 2;
foreach ( $item->field($itemfield) ) {
$_->update( $sf => $v );
}
foreach ( $item->field($itemfield) ) {
$_->update( $sf => $v );
}