In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/e2e1d5ce8b2c46b5dca1cb749153789a4315191a?hp=52d0e95bfa64548328a8cb945b92a6ff4892a5ad>

- Log -----------------------------------------------------------------
commit e2e1d5ce8b2c46b5dca1cb749153789a4315191a
Author: Tony Cook <[email protected]>
Date:   Sat Aug 4 13:53:38 2012 +1000

    avoid decoding on input in the new tests added in 613c63b4
    
    This fixes these tests when run in a unicode environment, eg:
    
      PERL_UNICODE= LC_ALL=en_AU.utf8 ./perl op/magic.t
    
    This does fix tha code page related issue on Win32.
-----------------------------------------------------------------------

Summary of changes:
 t/op/magic.t |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/t/op/magic.t b/t/op/magic.t
index 03487b0..3a620aa 100644
--- a/t/op/magic.t
+++ b/t/op/magic.t
@@ -65,6 +65,8 @@ $PERL = $ENV{PERL}
 
 sub env_is {
     my ($key, $val, $desc) = @_;
+
+    use open IN => ":raw";
     if ($Is_MSWin32) {
         # cmd.exe will echo 'variable=value' but 4nt will echo just the value
         # -- Nikola Knezevic

--
Perl5 Master Repository

Reply via email to