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

(-)a/C4/Serials.pm (-5 / +5 lines)
Lines 425-431 sub PrepareSerialsData { Link Here
425
            }
425
            }
426
        }
426
        }
427
        $subs->{ "status" . $subs->{'status'} } = 1;
427
        $subs->{ "status" . $subs->{'status'} } = 1;
428
        if ( grep { $_ == $subs->{status} } ( 1, 3, 4, 41, 42, 43, 44, 7 ) ) {
428
        if ( grep { $_ == $subs->{status} } qw( 1 3 4 41 42 43 44 7 ) ) {
429
            $subs->{"checked"} = 1;
429
            $subs->{"checked"} = 1;
430
        }
430
        }
431
431
Lines 1250-1259 sub ModSerialStatus { Link Here
1250
            if ( $status == 2 || ($oldstatus == 2 && $status != 2) ) {
1250
            if ( $status == 2 || ($oldstatus == 2 && $status != 2) ) {
1251
                  _update_receivedlist($subscriptionid);
1251
                  _update_receivedlist($subscriptionid);
1252
            }
1252
            }
1253
            if(  grep { $_ == $status } ( 4, 41, 42, 43, 44, 5 )
1253
            my @missing_statuses = qw( 4 41 42 43 44 );
1254
            if ( (  grep { $_ == $status } ( @missing_statuses, 5 ) )
1254
              || (
1255
              || (
1255
                  grep { $_ == $oldstatus } ( 4, 41, 42, 43, 44 )
1256
                  ( grep { $_ == $oldstatus } @missing_statuses )
1256
                  && ! grep { $_ == $status } ( 4, 41, 42, 43, 44 ) )
1257
                  && ! ( grep { $_ == $status } @missing_statuses ) )
1257
              || ($oldstatus == 5 && $status != 5)) {
1258
              || ($oldstatus == 5 && $status != 5)) {
1258
                _update_missinglist($subscriptionid);
1259
                _update_missinglist($subscriptionid);
1259
            }
1260
            }
1260
- 

Return to bug 10851