-#!/usr/bin/env perl
use strict;
+use warnings FATAL => 'all';
+
use Test::More;
+use if $ENV{AUTHOR_TESTING}, 'Test::Warnings';
use Test::Fatal;
-
my %config_from_file_args;
{
package A;
is(exception { C->new_with_config() }, undef, 'C->new_with_config lives');
is($config_from_file_args{C}, '/dir/C', 'C configfile attr default sub is called, with classname');
-
-done_testing();
+done_testing;