memberentry.pl - $debug-ify warn messages

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Joe Atzberger 2007-12-18 13:06:35 -06:00 committed by Joshua Ferraro
parent a65502ba1a
commit 116e5aed66
1 changed files with 2 additions and 2 deletions

View File

@ -171,7 +171,7 @@ if ($op eq 'save' || $op eq 'insert'){
$nok = 1;
}
}
warn $newdata{'dateofbirth'};
$debug and warn "dateofbirth: " . $newdata{'dateofbirth'};
if (C4::Context->preference("IndependantBranches")) {
if ($userenv && $userenv->{flags} != 1){
@ -222,7 +222,7 @@ if ($op eq 'save'){
delete $newdata{'password'};
delete $newdata{'userid'};
}
warn $newdata{'dateofbirth'};
$debug and warn "dateofbirth: " . $newdata{'dateofbirth'};
&ModMember(%newdata);
if ($destination eq "circ") {
print $input->redirect("/cgi-bin/koha/circ/circulation.pl?findborrower=$data{'cardnumber'}");