From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sun, 25 Jan 2009 16:54:02 +0000 (+0000)
Subject: remove debug warnings
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9c77c0028b0eb2fa8fb4ef2fbb4dd48c4baed6de;p=Evergreen.git

remove debug warnings

git-svn-id: svn://svn.open-ils.org/ILS/trunk@11950 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/extras/fast-extract b/Open-ILS/src/extras/fast-extract
index 56c53ba6c6..8ad32a5ed2 100755
--- a/Open-ILS/src/extras/fast-extract
+++ b/Open-ILS/src/extras/fast-extract
@@ -50,8 +50,6 @@ my $dbh = DBI->connect($dsn,$db_user,$db_pw, {AutoCommit => 1, pg_enable_utf8 =>
 my $SQL = 'SELECT id FROM biblio.record_entry';
 $SQL .= " WHERE edit_date > '$after'" if ($after);
 
-warn "Initial selection SQL: $SQL\n";
-
 my $ids = $dbh->selectcol_arrayref($SQL);
 
 $SQL = <<'SQL';
@@ -63,8 +61,6 @@ SELECT  id,
   WHERE id = ?
 SQL
 
-warn "Record retrieval SQL: $SQL\n";
-
 for my $id ( @$ids ) {
     my $row = $dbh->selectrow_hashref( $SQL, {}, $id );
     print "$$row{id}$delim$$row{tnc_source}$delim$$row{tcn_value}$delim$$row{marc}\n";