From: miker Date: Mon, 4 Sep 2006 17:39:50 +0000 (+0000) Subject: ingnore expired for now ... until we can compress the list X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f413b06cb0aa36173decfdbf89cb517c7d6c7882;p=Evergreen.git ingnore expired for now ... until we can compress the list git-svn-id: svn://svn.open-ils.org/ILS/trunk@5925 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/support-scripts/offline-blocked-list.pl b/Open-ILS/src/support-scripts/offline-blocked-list.pl index f795a93c26..8933e7a780 100755 --- a/Open-ILS/src/support-scripts/offline-blocked-list.pl +++ b/Open-ILS/src/support-scripts/offline-blocked-list.pl @@ -17,11 +17,13 @@ while (my $resp = $lost->recv ) { } $lost->finish; -my $expired = $ses->request( 'open-ils.storage.actor.user.expired_barcodes' ); -while (my $resp = $expired->recv ) { - print $resp->content . " E\n"; +if(0) { # XXX just too many... arg + my $expired = $ses->request( 'open-ils.storage.actor.user.expired_barcodes' ); + while (my $resp = $expired->recv ) { + print $resp->content . " E\n"; + } + $expired->finish; } -$expired->finish; my $barred = $ses->request( 'open-ils.storage.actor.user.barred_barcodes' ); while (my $resp = $barred->recv ) {