*** empty log message ***
authorShawn Boyette <sboyette@esilibrary.com>
Wed, 10 Dec 2008 21:05:07 +0000 (21:05 +0000)
committerShawn Boyette <sboyette@esilibrary.com>
Wed, 10 Dec 2008 21:05:07 +0000 (21:05 +0000)
compress_fingerprints

index f0b9374..d1274f7 100755 (executable)
@@ -99,8 +99,8 @@ sub dump_records {
     open OUT, '>', $conf->{output}
       or die "Can't open ", $conf->{output}, "$!\n";
     for my $id (keys %recs) {
-#        $used{$id} = 1;
         next unless $recs{$id}{lead};
+        $used{$id} = 1;
         for my $sha1 ( keys %{$recs{$id}} ) {
             for my $subid ( @{$fps{$sha1}{recs}} ) {
                 next if ($id == $subid);