X-Git-Url: http://git.rot13.org/?p=webpac2;a=blobdiff_plain;f=lib%2FWebPAC%2FInput%2FMARC.pm;fp=lib%2FWebPAC%2FInput%2FMARC.pm;h=4a8e1c5b12ab3b85dd0130545b2a39f9b82ee5e2;hp=60023200e4fc897e0caa1f8aed46e415dbc3da1f;hb=eada07674773902b0f3c8ddad295684c4712620e;hpb=3f7a7fa6ea289b2579240e32bfc9ef5f1d745fac

diff --git a/lib/WebPAC/Input/MARC.pm b/lib/WebPAC/Input/MARC.pm
index 6002320..4a8e1c5 100644
--- a/lib/WebPAC/Input/MARC.pm
+++ b/lib/WebPAC/Input/MARC.pm
@@ -57,7 +57,7 @@ sub new {
 	my $db = new MARC::Fast(
 		marcdb => $arg->{path},
 	);
-	my $db_size = $db->count - 1;	# FIXME
+	my $db_size = $db->count;
 
 	$self->{_marc_size} = $db_size;
 	$self->{_marc_db} = $db;