Bug 8896: Delete serials no more missing from missinglist
When manual history is disabled in subscription history section if a serial has been previously set as missing and is received or set as expected, late or claimed, it will be deleted from missinglist Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Regex needs a followup. More comments on Bugzilla. Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com> Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
This commit is contained in:
parent
f85fb5e5ed
commit
ccc7f535cb
1 changed files with 4 additions and 1 deletions
|
@ -1138,7 +1138,10 @@ sub ModSerialStatus {
|
||||||
$recievedlist .= "; $serialseq"
|
$recievedlist .= "; $serialseq"
|
||||||
unless ( index( "$recievedlist", "$serialseq" ) >= 0 );
|
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");
|
# warn "missinglist : $missinglist serialseq :$serialseq, ".index("$missinglist","$serialseq");
|
||||||
$missinglist .= "; $serialseq"
|
$missinglist .= "; $serialseq"
|
||||||
if ( $status == 4
|
if ( $status == 4
|
||||||
|
|
Loading…
Reference in a new issue