even more debugging

git-svn-id: svn://svn.open-ils.org/ILS/trunk@7864 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 526214d..8e2811c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm
@@ -88,6 +88,8 @@ sub handler {
 
        return show_template($r) unless (@records);
 
+       warn "ids: :". join(',',@records);
+
        my $type = $cgi->param('rectype') || 'biblio';
        if ($type ne 'biblio' && $type ne 'authority') {
                die "Bad record type: $type";