#!/usr/bin/env perl

use strict;
use warnings;
use Test::More;
use Test::Exception;
use Catmandu::ArrayIterator;

my $pkg;

BEGIN {
    $pkg = 'Catmandu::Fix::reject';
    use_ok $pkg;
}

my $fix = $pkg->new;

is $fix->fix({}), undef;
is_deeply $fix->fix([{}]), [];
is_deeply $fix->fix(Catmandu::ArrayIterator->new([{}]))->to_array, [];

done_testing 4;