diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-07-15 20:21:15 +0200 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2006-07-17 14:32:19 +0000 |
| commit | b7c34493369bdd41a81cd335c43a2c5275ebf4f7 (patch) | |
| tree | 77909502f8268870776f3006ea0a12aaa328e93e /t/comp | |
| parent | 96f4e2269315e1961a4e9db45c14fef0dbfeee02 (diff) | |
| download | perl-b7c34493369bdd41a81cd335c43a2c5275ebf4f7.tar.gz | |
Silence system warning during tests (only on win32 for now)
Message-ID: <9b18b3110607150921p33be8e87wd51b2fd317a81587@mail.gmail.com>
p4raw-id: //depot/perl@28594
Diffstat (limited to 't/comp')
| -rw-r--r-- | t/comp/opsubs.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/t/comp/opsubs.t b/t/comp/opsubs.t index 0bbe09904d..3faca21424 100644 --- a/t/comp/opsubs.t +++ b/t/comp/opsubs.t @@ -59,7 +59,8 @@ is( &qw('amper'), "qw-amper", "&qw() is func" ); # qx operator can_ok( 'main', "qx" ); -eval "qx('unqualified')"; +eval "qx('unqualified'". + ($^O eq 'MSWin32' ? " 2>&1)" : ")"); SKIP: { skip("external command not portable on VMS", 1) if $^O eq 'VMS'; TODO: { |