--- trunk/lib/WebPAC/Input.pm	2006/09/29 19:52:17	726
+++ trunk/lib/WebPAC/Input.pm	2006/10/10 10:57:59	757
@@ -377,6 +377,9 @@
 	$self->{max_pos} = $to_rec;
 	$log->debug("max_pos: $to_rec");
 
+	# save for dump
+	$self->{ll_db} = $ll_db;
+
 	return $size;
 }
 
@@ -547,7 +550,7 @@
 sub dump {
 	my $self = shift;
 
-	return $self->{dump_rec}->($self, $self->{pos});
+	return $self->{ll_db}->dump_rec( $self->{pos} );
 
 }