diff --git a/t/02-init.t b/t/02-init.t index 2401a01729705e456ce34b5a0790957e64ff1c2c..b501882b6933546a06c02dd2ba167c1e365b5986 100644 --- a/t/02-init.t +++ b/t/02-init.t @@ -4,10 +4,12 @@ use Test::Cmd; use Test::More tests =>6; use Test::TA; use Path::Tiny; -$ENV{'TEST_ACTIVE'}=1; -delete $ENV{PERL_MM_USE_DEFAULT}; my $testapp = Test::TA::testapp(); -local $ENV{'HOME'} = $testapp->workpath(); +if ( $ENV{_} !~ /dzil/) { # patch if not dzil + $ENV{'TEST_ACTIVE'} = 1; + delete $ENV{PERL_MM_USE_DEFAULT}; + local $ENV{'HOME'} = $testapp->workpath(); +} my $config_dir = path($testapp->workpath())->child('.config'); $config_dir->mkpath(); my $config_file = $config_dir->child('ta-tool.rc');