From: miker Date: Wed, 3 Oct 2007 18:33:40 +0000 (+0000) Subject: debugging X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=1acb15ef6801bd1730b14bd5251767e0ff003947;p=Evergreen.git debugging git-svn-id: svn://svn.open-ils.org/ILS/trunk@7861 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm b/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm index 76ea0b5a00..6b39708d57 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm @@ -71,6 +71,7 @@ sub handler { my $id = $data[$col]; $id =~ s/\D+//o; next unless ($id); + warn "ID $id"; push @records, $id; } }