( $ch, $noreplace )= resetBadBooleans( $ch, $noreplace );
for my $search (@$searches) {
  for (qw( case wholeword startverse endverse flexdelimit regex yn )) {
    $search->{$_}= resetBadBooleans($search->{$_});
  }
}