[Koha-patches] [PATCH] bug 2505: enable warnings for opac/sco/sco-main.pl

[Galen Charlton]

---
 opac/sco/sco-main.pl |   15 +++++++++------
 1 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/opac/sco/sco-main.pl b/opac/sco/sco-main.pl
index 2c2f2f4..22a7af3 100755
--- a/opac/sco/sco-main.pl
+++ b/opac/sco/sco-main.pl
@@ -6,6 +6,7 @@
 # issue items to that borrower.
 #
 use strict;
+use warnings;
 
 use CGI;
 
@@ -34,12 +35,14 @@ my ($template, $loggedinuser, $cookie)
 my $dbh = C4::Context->dbh;
 
 my $issuerid = $loggedinuser;
-my ($op, $patronid, $barcode, $confirmed, $timedout )= ($query->param("op"), 
-					 $query->param("patronid"), 
-					$query->param("barcode"),
-					$query->param( "confirmed"),
-					$query->param( "timedout"), #not actually using this...
-					 );
+my ($op, $patronid, $barcode, $confirmed, $timedout) = (
+    $query->param("op")         || '',
+    $query->param("patronid")   || '',
+    $query->param("barcode")    || '',
+    $query->param( "confirmed") || '',
+    $query->param( "timedout")  || '', #not actually using this...
+);
+
 my %confirmation_strings = ( RENEW_ISSUE => "This item is already checked out to you.  Return it?", );
 my $issuenoconfirm = 1; #don't need to confirm on issue.
 my $cnt = 0;
-- 
1.5.5.GIT