View | Details | Raw Unified | Return to bug 8896
Collapse All | Expand All

(-)a/C4/Serials.pm (-2 / +4 lines)
Lines 1040-1046 sub ModSerialStatus { Link Here
1040
                $recievedlist .= "; $serialseq"
1040
                $recievedlist .= "; $serialseq"
1041
                  unless ( index( "$recievedlist", "$serialseq" ) >= 0 );
1041
                  unless ( index( "$recievedlist", "$serialseq" ) >= 0 );
1042
            }
1042
            }
1043
1043
            # in case serial has been previously marked as missing
1044
            if ( $status ~~ (2,3,7)) {
1045
                $missinglist =~ s/[,;]?\s?$serialseq//g;
1046
            }
1044
            #         warn "missinglist : $missinglist serialseq :$serialseq, ".index("$missinglist","$serialseq");
1047
            #         warn "missinglist : $missinglist serialseq :$serialseq, ".index("$missinglist","$serialseq");
1045
            $missinglist .= "; $serialseq"
1048
            $missinglist .= "; $serialseq"
1046
              if ( $status == 4
1049
              if ( $status == 4
1047
- 

Return to bug 8896