diff options
author | Andrej Borsenkow <Andrej.Borsenkow@mow.siemens.ru> | 2002-05-08 14:47:51 +0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-08 12:44:46 +0000 |
commit | e5e32a3af68bad2724c5ecf673fa0e8a34a4fe13 (patch) | |
tree | 002db318e8f296187837c59ae7587d1b85fabd52 | |
parent | 83d38f535bd86b7f8a5c657ac4f0343618bf2e41 (diff) | |
download | perl-e5e32a3af68bad2724c5ecf673fa0e8a34a4fe13.tar.gz |
[ID 20020507.020] PATCH: 5.6.1: t/op/misc.t: locale -a missing 2>/dev/null
Message-Id: <6134254DE87BD411908B00A0C99B044F035BBFCB@mowd019a.mow.siemens.ru>
p4raw-id: //depot/perl@16483
-rw-r--r-- | t/run/fresh_perl.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/run/fresh_perl.t b/t/run/fresh_perl.t index 3cac42fcd8..ad0f363c60 100644 --- a/t/run/fresh_perl.t +++ b/t/run/fresh_perl.t @@ -573,7 +573,7 @@ EOT EXPECT ok ######## -# This test is here instead of pragma/locale.t because +# This test is here instead of lib/locale.t because # the bug depends on in the internal state of the locale # settings and pragma/locale messes up that state pretty badly. # We need a "fresh run". @@ -591,7 +591,7 @@ $have_setlocale = 0 if $@; $have_setlocale = 0 if (($^O eq 'MSWin32' || $^O eq 'NetWare') && $Config{cc} =~ /^(cl|gcc)/i); exit(0) unless $have_setlocale; my @locales; -if (-x "/usr/bin/locale" && open(LOCALES, "/usr/bin/locale -a|")) { +if (-x "/usr/bin/locale" && open(LOCALES, "/usr/bin/locale -a 2>/dev/null|")) { while(<LOCALES>) { chomp; push(@locales, $_); |