--- trunk/run.pl	2005/12/06 16:40:18	233
+++ trunk/run.pl	2005/12/15 14:12:00	251
@@ -77,6 +77,7 @@
 		my $isis = new WebPAC::Input::ISIS(
 			code_page => $config->{webpac}->{webpac_encoding},
 			limit_mfn => $input->{limit},
+			lookup => $lookup,
 		);
 
 		my $maxmfn = $isis->open(
@@ -84,6 +85,8 @@
 			code_page => $input->{encoding},	# database encoding
 		);
 
+$log->info( Dumper($lookup->{_lookup_data}) );
+
 		my $n = new WebPAC::Normalize::XML(
 		#	filter => { 'foo' => sub { shift } },
 			db => $db,