testing adding leads to %used but only denying them as subs
authorShawn Boyette <sboyette@esilibrary.com>
Mon, 8 Dec 2008 23:37:01 +0000 (23:37 +0000)
committerShawn Boyette <sboyette@esilibrary.com>
Mon, 8 Dec 2008 23:37:01 +0000 (23:37 +0000)
compress_fingerprints

index 655001c..3d96126 100755 (executable)
@@ -98,7 +98,7 @@ sub dump_records {
     open OUT, '>', $conf->{output}
       or die "Can't open ", $conf->{output}, "$!\n";
     for my $id (keys %recs) {
-        next if defined $used{$id};
+        #next if defined $used{$id};
         $used{$id} = 1;
         next unless $recs{$id}{lead};
         for my $sha1 ( keys %{$recs{$id}} ) {