--- trunk/lib/WebPAC/Input.pm 2009/09/20 22:26:27 1305 +++ trunk/lib/WebPAC/Input.pm 2009/09/21 15:48:52 1306 @@ -473,7 +473,8 @@ sub size { my $self = shift; - return $self->{size}; + $self->{ll_db}->size if $self->{ll_db}->can('size'); + return $self->{size}; # FIXME this is buggy if open is called multiple times! } =head2 seek