From 3dddfbd2e4db3425fb04543604e00a101d978be4 Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Wed, 3 Jul 2019 15:34:48 -0300
Subject: [PATCH] Bug 22280: Fix typo in _status_graph_union

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Andrew Isherwood <andrew.isherwood@ptfs-europe.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
(cherry picked from commit 633800120840384374fef3da091800a6d989e723)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 Koha/Illrequest.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Koha/Illrequest.pm b/Koha/Illrequest.pm
index 1ca2991628..73e590acc1 100644
--- a/Koha/Illrequest.pm
+++ b/Koha/Illrequest.pm
@@ -529,7 +529,7 @@ sub _status_graph_union {
         $status_graph->{$backend_status_key} = $backend_status;
         # Update all core methods' next_actions.
         foreach my $prev_action ( @{$backend_status->{prev_actions}} ) {
-            if ( grep $prev_action, @core_status_ids ) {
+            if ( grep { $prev_action eq $_ } @core_status_ids ) {
                 my @next_actions =
                      @{$status_graph->{$prev_action}->{next_actions}};
                 push @next_actions, $backend_status_key;
@@ -539,7 +539,7 @@ sub _status_graph_union {
         }
         # Update all core methods' prev_actions
         foreach my $next_action ( @{$backend_status->{next_actions}} ) {
-            if ( grep $next_action, @core_status_ids ) {
+            if ( grep { $next_action eq $_ } @core_status_ids ) {
                 my @prev_actions =
                      @{$status_graph->{$next_action}->{prev_actions}};
                 push @prev_actions, $backend_status_key;
-- 
2.39.5