--- trunk/lib/WebPAC/Input/Gutenberg.pm 2006/11/05 14:51:59 778 +++ trunk/lib/WebPAC/Input/Gutenberg.pm 2006/11/05 14:52:04 779 @@ -100,7 +100,6 @@ $etext_no =~ s/^etext//; my $row = { - '000' => [ $mfn ], '001' => [ $etext_no ], };