From: Gurusamy Sarathy Date: Sun, 28 May 2000 07:57:47 +0000 (+0000) Subject: avoid warnings in POSIX.pm (from Barrie Slaymaker) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=29778b0a112f48db42e9a1afb6e937e0ce9be444;p=p5sagit%2Fp5-mst-13.2.git avoid warnings in POSIX.pm (from Barrie Slaymaker) p4raw-id: //depot/perl@6131 --- diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm index 9416f70..d4d9c33 100644 --- a/ext/POSIX/POSIX.pm +++ b/ext/POSIX/POSIX.pm @@ -565,9 +565,9 @@ sub chmod { sub fstat { usage "fstat(fd)" if @_ != 1; local *TMP; - open(TMP, "<&$_[0]"); # Gross. + CORE::open(TMP, "<&$_[0]"); # Gross. my @l = CORE::stat(TMP); - close(TMP); + CORE::close(TMP); @l; }