From f413b06cb0aa36173decfdbf89cb517c7d6c7882 Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 4 Sep 2006 17:39:50 +0000
Subject: [PATCH] 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
---
 Open-ILS/src/support-scripts/offline-blocked-list.pl | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

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 ) {
-- 
2.43.2