From d0e3c9bc9a793b04609fa8848ac0220f5bd5c131 Mon Sep 17 00:00:00 2001
From: Colin Campbell <colin.campbell@ptfs-europe.com>
Date: Wed, 15 Jun 2011 12:15:14 +0100
Subject: [PATCH] Bug 2505 : Switch on warnings in circ/returns.pl

Removed a compile time warning caused by a void context
in a bit of too clever obscure code
---
 circ/returns.pl |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/circ/returns.pl b/circ/returns.pl
index e142117..43b50fe 100755
--- a/circ/returns.pl
+++ b/circ/returns.pl
@@ -27,7 +27,7 @@ script to execute returns of books
 =cut
 
 use strict;
-#use warnings; FIXME - Bug 2505
+use warnings;
 
 use CGI;
 use C4::Context;
@@ -223,7 +223,8 @@ if ($barcode) {
 #
     ( $returned, $messages, $issueinformation, $borrower ) =
       AddReturn( $barcode, $userenv_branch, $exemptfine, $dropboxmode);     # do the return
-    my $homeorholdingbranchreturn = C4::Context->preference('HomeOrHoldingBranchReturn') or 'homebranch';
+    my $homeorholdingbranchreturn = C4::Context->preference('HomeOrHoldingBranchReturn');
+    $homeorholdingbranchreturn ||= 'homebranch';
 
     # get biblio description
     my $biblio = GetBiblioFromItemNumber($itemnumber);
-- 
1.7.5.4