clean up debugger environment before testing with it

[p5sagit/namespace-clean.git] / t / 07-debugger.t

diff --git a/t/07-debugger.t b/t/07-debugger.t
index 8155214..c52c34a 100644 (file)
--- a/t/07-debugger.t
+++ b/t/07-debugger.t
@@ -16,14 +16,17 @@ BEGIN {
 
 BEGIN {
   # shut up the debugger
-  $ENV{PERLDB_OPTS} = 'NonStop';
+  delete $ENV{$_} for grep /^PERL5?DB/, keys %ENV;
+  delete $ENV{LOGDIR};
+  $ENV{HOME} = '.';
+  $ENV{PERLDB_OPTS} = 'NonStop noTTY';
 }
 
 BEGIN {
 
 #line 1
 #!/usr/bin/perl -d
-#line 27
+#line 30
 
 }