Avoid list assignment to %ENV

It's not portable and isn't needed here, where we only want to override a single element.
Test-More · Aug 4, 2024 · 2c4f6f6 · 2c4f6f6
1 parent 0ced3fb
commit 2c4f6f6
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 8 deletions.
diff --git a/t/modules/Require/AutomatedTesting.t b/t/modules/Require/AutomatedTesting.t
@@ -1,8 +1,7 @@
 use Test2::Bundle::Extended -target => 'Test2::Require::AutomatedTesting';
 
 {
-    local %ENV = %ENV;
-    $ENV{AUTOMATED_TESTING} = 0;
+    local $ENV{AUTOMATED_TESTING} = 0;
     is($CLASS->skip(), 'Automated test, set the $AUTOMATED_TESTING environment variable to run it', "will skip");
 
     $ENV{AUTOMATED_TESTING} = 1;

diff --git a/t/modules/Require/ExtendedTesting.t b/t/modules/Require/ExtendedTesting.t
@@ -1,8 +1,7 @@
 use Test2::Bundle::Extended -target => 'Test2::Require::ExtendedTesting';
 
 {
-    local %ENV = %ENV;
-    $ENV{EXTENDED_TESTING} = 0;
+    local $ENV{EXTENDED_TESTING} = 0;
     is($CLASS->skip(), 'Extended test, set the $EXTENDED_TESTING environment variable to run it', "will skip");
 
     $ENV{EXTENDED_TESTING} = 1;

diff --git a/t/modules/Require/NonInteractiveTesting.t b/t/modules/Require/NonInteractiveTesting.t
@@ -1,8 +1,7 @@
 use Test2::Bundle::Extended -target => 'Test2::Require::NonInteractiveTesting';
 
 {
-    local %ENV = %ENV;
-    $ENV{NONINTERACTIVE_TESTING} = 0;
+    local $ENV{NONINTERACTIVE_TESTING} = 0;
     is($CLASS->skip(), 'NonInteractive test, set the $NONINTERACTIVE_TESTING environment variable to run it', "will skip");
 
     $ENV{NONINTERACTIVE_TESTING} = 1;

diff --git a/t/modules/Require/ReleaseTesting.t b/t/modules/Require/ReleaseTesting.t
@@ -1,8 +1,7 @@
 use Test2::Bundle::Extended -target => 'Test2::Require::ReleaseTesting';
 
 {
-    local %ENV = %ENV;
-    $ENV{RELEASE_TESTING} = 0;
+    local $ENV{RELEASE_TESTING} = 0;
     is($CLASS->skip(), 'Release test, set the $RELEASE_TESTING environment variable to run it', "will skip");
 
     $ENV{RELEASE_TESTING} = 1;