--- trunk/lib/WebPAC/Input.pm	2007/06/21 21:26:17	868
+++ trunk/lib/WebPAC/Input.pm	2007/06/22 00:03:46	873
@@ -236,7 +236,7 @@
 
 	my $ll_db = $class->new(
 		path => $arg->{path},
-		input_config => $arg->{input_config},
+		input_config => $arg->{input_config} || $self->{input_config},
 #		filter => sub {
 #			my ($l,$f_nr) = @_;
 #			return unless defined($l);