--- trunk/lib/WebPAC/Input/MARC.pm 2007/11/21 10:09:55 1062 +++ trunk/lib/WebPAC/Input/MARC.pm 2007/11/27 21:01:44 1063 @@ -71,8 +71,6 @@ my $rec = $self->fetch_rec( $mfn ); -} - =cut sub fetch_rec { @@ -97,8 +95,6 @@ print $self->dump_ascii( $mfn ); -} - =cut sub dump_ascii {