--- trunk/lib/WebPAC/Parser.pm	2006/10/08 20:28:17	755
+++ trunk/lib/WebPAC/Parser.pm	2007/02/04 23:10:18	800
@@ -238,6 +238,8 @@
 
 	my @sources;
 
+	my $lookup_src_cache;
+
 	$self->{config}->iterate_inputs( sub {
 		my ($input, $database) = @_;
 
@@ -260,6 +262,7 @@
 			$self->{valid_inputs}->{$database}->{$input_name}++;
 
 			push @sources, sub {
+				warn "### $database $input_name, $full ###\n";
 				$self->_parse_source( $database, $input_name, $full, $s );
 			};