From 116e5aed6699b456eae312a1abccbb7eb9fa4e71 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Tue, 18 Dec 2007 13:06:35 -0600 Subject: [PATCH] memberentry.pl - $debug-ify warn messages Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- members/memberentry.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/members/memberentry.pl b/members/memberentry.pl index 643069999e..253e6e45af 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -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'}"); -- 2.39.5