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

(-)a/Koha/Illrequest.pm (-3 / +2 lines)
Lines 529-535 sub _status_graph_union { Link Here
529
        $status_graph->{$backend_status_key} = $backend_status;
529
        $status_graph->{$backend_status_key} = $backend_status;
530
        # Update all core methods' next_actions.
530
        # Update all core methods' next_actions.
531
        foreach my $prev_action ( @{$backend_status->{prev_actions}} ) {
531
        foreach my $prev_action ( @{$backend_status->{prev_actions}} ) {
532
            if ( grep $prev_action, @core_status_ids ) {
532
            if ( grep { $prev_action eq $_ } @core_status_ids ) {
533
                my @next_actions =
533
                my @next_actions =
534
                     @{$status_graph->{$prev_action}->{next_actions}};
534
                     @{$status_graph->{$prev_action}->{next_actions}};
535
                push @next_actions, $backend_status_key;
535
                push @next_actions, $backend_status_key;
Lines 539-545 sub _status_graph_union { Link Here
539
        }
539
        }
540
        # Update all core methods' prev_actions
540
        # Update all core methods' prev_actions
541
        foreach my $next_action ( @{$backend_status->{next_actions}} ) {
541
        foreach my $next_action ( @{$backend_status->{next_actions}} ) {
542
            if ( grep $next_action, @core_status_ids ) {
542
            if ( grep { $next_action eq $_ } @core_status_ids ) {
543
                my @prev_actions =
543
                my @prev_actions =
544
                     @{$status_graph->{$next_action}->{prev_actions}};
544
                     @{$status_graph->{$next_action}->{prev_actions}};
545
                push @prev_actions, $backend_status_key;
545
                push @prev_actions, $backend_status_key;
546
- 

Return to bug 22280