From 29778b0a112f48db42e9a1afb6e937e0ce9be444 Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Sun, 28 May 2000 07:57:47 +0000 Subject: [PATCH] avoid warnings in POSIX.pm (from Barrie Slaymaker) p4raw-id: //depot/perl@6131 --- ext/POSIX/POSIX.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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; } -- 2.7.4