--- trunk/lib/WebPAC/Input/MARC.pm	2005/12/19 19:55:21	298
+++ trunk/lib/WebPAC/Input/MARC.pm	2005/12/20 19:01:27	309
@@ -3,8 +3,6 @@
 use warnings;
 use strict;
 
-use blib;
-
 use MARC::Fast;
 
 =head1 NAME
@@ -13,11 +11,11 @@
 
 =head1 VERSION
 
-Version 0.02
+Version 0.03
 
 =cut
 
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 
 =head1 SYNOPSIS
@@ -75,7 +73,7 @@
 	if ($mfn > $self->{size}) {
 		$self->_get_logger()->warn("seek beyond database size $self->{size} to $mfn");
 	} else {
-		my $row = $db->fetch($mfn);
+		my $row = $db->to_hash($mfn);
 		push @{$row->{'000'}}, $mfn;
 		return $row;
 	}