@@ -, +, @@ --- C4/Serials.pm | 5 ++++- 1 files changed, 4 insertions(+), 1 deletions(-) --- a/C4/Serials.pm +++ a/C4/Serials.pm @@ -1137,7 +1137,10 @@ sub ModSerialStatus { $recievedlist .= "; $serialseq" unless ( index( "$recievedlist", "$serialseq" ) >= 0 ); } - + # in case serial has been previously marked as missing + if (grep /$status/, (2,3,7)) { + $missinglist =~ s/[,;]?\s?$serialseq//g; + } # warn "missinglist : $missinglist serialseq :$serialseq, ".index("$missinglist","$serialseq"); $missinglist .= "; $serialseq" if ( $status == 4 --