This patches Magic.t to remove the $ENV{foo} it created on VMS.

This environment variable interferes with running other tests including CPAN tests.

-John
wb8...@qsl.net
Personal Opinion Only
--- /rsync_root/perl/t/op/magic.t       Fri May 22 11:40:09 2009
+++ t/op/magic.t        Mon May 25 20:22:42 2009
@@ -30,6 +30,11 @@
        $Is_MSWin32            ? '.\perl' :
        './perl');
 
+END {
+    # On VMS, environment variable changes are peristent after perl exits
+    delete $ENV{'FOO'} if $Is_VMS;
+}
+
 eval '$ENV{"FOO"} = "hi there";';      # check that ENV is inited inside eval
 # cmd.exe will echo 'variable=value' but 4nt will echo just the value
 # -- Nikola Knezevic

Reply via email to