Bug 8307: QA Followup for finishreceive.pl

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>

diff --git a/acqui/finishreceive.pl b/acqui/finishreceive.pl
index 0c62f24..900733d 100755 (executable)
--- a/acqui/finishreceive.pl
+++ b/acqui/finishreceive.pl
@@ -69,7 +69,7 @@ if ($quantityrec > $origquantityrec ) {
             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 );
                     }