#!/usr/bin/perl

# This test tests whether TAP::Harness::JUnit can be
# instantialized without a xmlfile argument (rt#42069)

use strict;
use warnings;

use TAP::Harness::JUnit;
use Test::More;

plan tests => 3;

my $harness;
close STDERR;
eval { $harness = TAP::Harness::JUnit->new };

ok( !$@ );
ok( $harness );
isa_ok( $harness, 'TAP::Harness::JUnit');