Bug 2505: Enabled warnings in opac-addbybiblionumber.pl and opac-alert-subscribe.pl
authorGarry Collum <gcollum@gmail.com>
Sun, 9 Aug 2009 21:37:36 +0000 (17:37 -0400)
committerGalen Charlton <gmcharlt@gmail.com>
Mon, 10 Aug 2009 02:18:26 +0000 (22:18 -0400)
Enabled warnings and fixed unintialized variables in opac-alert-subscribe.pl

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
opac/opac-addbybiblionumber.pl
opac/opac-alert-subscribe.pl

index 9e67b12..cb3a372 100755 (executable)
@@ -23,6 +23,8 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+use warnings;
+
 use C4::Biblio;
 use CGI;
 use C4::VirtualShelves qw/:DEFAULT GetRecentShelves RefreshShelvesSummary/;
index d0b68b1..8e827b6 100755 (executable)
@@ -19,6 +19,8 @@
 
 
 use strict;
+use warnings;
+
 use CGI;
 use C4::Auth;
 use C4::Dates;
@@ -30,13 +32,13 @@ use C4::Serials;
 
 
 my $query = new CGI;
-my $op    = $query->param('op');
+my $op    = $query->param('op') || '';
 my $dbh   = C4::Context->dbh;
 
 my $sth;
 my ( $template, $loggedinuser, $cookie );
 my $externalid   = $query->param('externalid');
-my $alerttype    = $query->param('alerttype');
+my $alerttype    = $query->param('alerttype') || '';
 my $biblionumber = $query->param('biblionumber');
 
 ( $template, $loggedinuser, $cookie ) = get_template_and_user(