use strict;
use warnings;

use Test::More 0.96;
use lib 't/lib';

our $TODO;
use Requires::CCAPI \$TODO;

use mocktest;

my $mock = mocktest->new();

use Test::CPAN::Changes::ReallyStrict;

my $rval = Test::CPAN::Changes::ReallyStrict::_real_changes_file_ok(
  $mock,
  {
    delete_empty_groups => undef,
    keep_comparing      => undef,
    filename            => "corpus/Changes_01.txt",
  }
);

if ( not ok( $rval, "Expected good file is good" ) ) {
  note $_ for $mock->ls_events;
}

done_testing;