build: Set environment variables only for CPAN tests

All these environment variables are only relevant while running the
test suite. Do not pollute the rest of the environment.

1 files changed, 8 insertions, 6 deletions

diff --git a/scripts/Build.PL.in b/scripts/Build.PL.in
index 376c04ceb..6418d0d36 100644
--- a/scripts/Build.PL.in
+++ b/scripts/Build.PL.in
@@ -17,12 +17,6 @@ if (-e 'Build.PL.in') {
 my $class = Module::Build->subclass(
     class => 'Module::Build::Dpkg',
     code => q{
-        BEGIN {
-            $ENV{DPKG_TEST_MODE} = 'cpan';
-            $ENV{DPKG_DATADIR} = 'data';
-            $ENV{DPKG_ORIGINS_DIR} = 't/origins';
-        }
-
         sub subst {
             my ($self, $file) = @_;
             my $path = $self->install_path();
@@ -52,6 +46,14 @@ my $class = Module::Build->subclass(
             $self->SUPER::ACTION_build;
             $self->subst('lib/Dpkg.pm');
         }
+        sub ACTION_test {
+            my $self = shift;
+
+            local $ENV{DPKG_TEST_MODE} = 'cpan';
+            local $ENV{DPKG_DATADIR} = 'data';
+            local $ENV{DPKG_ORIGINS_DIR} = 't/origins';
+            $self->SUPER::ACTION_test;
+        }
     },
 );