From f8d939909908388d57b02add0e21b4bf534c5b5e Mon Sep 17 00:00:00 2001 From: Julian Maurice Date: Fri, 14 Sep 2012 16:32:48 +0200 Subject: [PATCH] Bug 5349: Fix a logical test in TransferOrder --- C4/Acquisition.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 9ad5f71..9a4560a 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -1575,7 +1575,7 @@ Return the ordernumber of created order. sub TransferOrder { my ($ordernumber, $basketno) = @_; - return unless $ordernumber or $basketno; + return unless ($ordernumber and $basketno); my $order = GetOrder( $ordernumber ); return if $order->{datereceived}; -- 1.7.10.4