X-Git-Url: http://git.shiar.net/gitweb.cgi/perl/plp/.git/blobdiff_plain/6db00316eea58801d93d78985f92ef97893903c9..b3c4162b66c7114eb1bbf2ccb0b0472288576c83:/t/50-cgi.t

diff --git a/t/50-cgi.t b/t/50-cgi.t
index 0de6940..1dab313 100644
--- a/t/50-cgi.t
+++ b/t/50-cgi.t
@@ -18,7 +18,7 @@ my $base = -w '/tmp' ? '/tmp' : cwd();
 my $testfile = 'testfile.plp';
 not -f "$base/$testfile" or BAIL_OUT("$testfile exists");
 
-open ORGOUT, '>&', STDOUT;
+open ORGOUT, '>&', *STDOUT;
 
 sub plp_is {
 	my ($test, $plp, $expect) = @_;