cvsuser 04/10/01 14:41:11
Modified: config/gen icu.pl
Log:
3 arg open() with a mode of ">&" isn't present on 5.6.x
Revision Changes Path
1.22 +3 -3 parrot/config/gen/icu.pl
Index: icu.pl
===================================================================
RCS file: /cvs/public/parrot/config/gen/icu.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -w -r1.21 -r1.22
--- icu.pl 30 Sep 2004 12:25:23 -0000 1.21
+++ icu.pl 1 Oct 2004 21:41:11 -0000 1.22
@@ -1,6 +1,6 @@
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-# $Id: icu.pl,v 1.21 2004/09/30 12:25:23 jrieks Exp $
+# $Id: icu.pl,v 1.22 2004/10/01 21:41:11 nicholas Exp $
=head1 NAME
@@ -43,7 +43,7 @@
{
# disable STDERR
- open OLDERR, ">&", \*STDERR;
+ open OLDERR, ">&STDERR";
open STDERR, ">d8e622ad2.log";
# check if ICU is installed
@@ -54,7 +54,7 @@
# reenable STDERR
close STDERR;
unlink "d8e622ad2.log";
- open STDERR, ">&", \*OLDERR;
+ open STDERR, ">&OLDERR";
}
if ($notfound) {
