diff --git a/C4/Serials.pm b/C4/Serials.pm index b8b53ed21f..784916c11b 100644 --- a/C4/Serials.pm +++ b/C4/Serials.pm @@ -1138,7 +1138,10 @@ sub ModSerialStatus { $recievedlist .= "; $serialseq" unless ( index( "$recievedlist", "$serialseq" ) >= 0 ); } - + # in case serial has been previously marked as missing + if (grep /$status/, (1,2,3,7)) { + $missinglist =~ s/[,;]?\s?$serialseq//g; + } # warn "missinglist : $missinglist serialseq :$serialseq, ".index("$missinglist","$serialseq"); $missinglist .= "; $serialseq" if ( $status == 4