}
} else {
# If not displaying, we're testing.
- is( $row->{'genealogical'}, $expected{$row->{'id'}},
+ # HACK to cope with formerly unuseful rows
+ unless( exists $expected{$row->{'id'}} ) {
+ $expected{$row->{'id'}} = 1;
+ }
+ my $gen_bool = $row->{'genealogical'} ? 1 : '';
+ is( $gen_bool, $expected{$row->{'id'}},
"Got expected genealogical result for rank " . $row->{'id'} );
# If the row is genealogical, there should be one reading with no parents,
# every reading should independently occur exactly once, and the total