@@ -, +, @@ --- members/members-home.pl | 2 ++ members/setstatus.pl | 5 +++-- 2 files changed, 5 insertions(+), 2 deletions(-) --- a/members/members-home.pl +++ a/members/members-home.pl @@ -16,6 +16,8 @@ # Suite 330, Boston, MA 02111-1307 USA use strict; +use warnings; + use CGI; use C4::Auth; use C4::Output; --- a/members/setstatus.pl +++ a/members/setstatus.pl @@ -23,6 +23,7 @@ # Suite 330, Boston, MA 02111-1307 USA use strict; +use warnings; use CGI; use C4::Context; @@ -36,11 +37,11 @@ my $flagsrequired; $flagsrequired->{borrowers}=1; my ($loggedinuser, $cookie, $sessionID) = checkauth($input, 0, $flagsrequired); -my $destination = $input->param("destination"); +my $destination = $input->param("destination") || ''; my $cardnumber = $input->param("cardnumber"); my $borrowernumber=$input->param('borrowernumber'); my $status = $input->param('status'); -my $reregistration = $input->param('reregistration'); +my $reregistration = $input->param('reregistration') || ''; my $dbh = C4::Context->dbh; my $dateexpiry; --