--- trunk/lib/WebPAC/Normalize.pm 2005/12/05 17:46:57 209 +++ trunk/lib/WebPAC/Normalize.pm 2005/12/05 17:47:51 217 @@ -11,11 +11,11 @@ =head1 VERSION -Version 0.02 +Version 0.03 =cut -our $VERSION = '0.02'; +our $VERSION = '0.03'; =head1 SYNOPSIS @@ -143,7 +143,7 @@ my $cache_file; if ($self->{'db'}) { - my $ds = $self->{'db'}->load_ds( $mfn ); + my $ds = $self->{'db'}->load_ds( id => $mfn ); $log->debug("load_ds( rec = ", sub { Dumper($rec) }, ") = ", sub { Dumper($ds) }); return $ds if ($ds); $log->debug("cache miss, creating");