Change 28594 by [EMAIL PROTECTED] on 2006/07/17 14:32:19
Subject: Silence system warning during tests (only on win32 for now)
From: demerphq <[EMAIL PROTECTED]>
Date: Sat, 15 Jul 2006 18:21:15 +0200
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/t/comp/opsubs.t#4 edit
Differences ...
==== //depot/perl/t/comp/opsubs.t#4 (text) ====
Index: perl/t/comp/opsubs.t
--- perl/t/comp/opsubs.t#3~27309~ 2006-02-24 04:52:01.000000000 -0800
+++ perl/t/comp/opsubs.t 2006-07-17 07:32:19.000000000 -0700
@@ -59,7 +59,8 @@
# 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: {
End of Patch.
