From a41ecaa8490fcdab7d487faf0073f6ffc801e2d2 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Tue, 2 Feb 1999 17:10:33 +0000 Subject: POSIX::redef setv?buf() to IO::Handle:: (by gbarr). p4raw-id: //depot/cfgperl@2794 --- ext/POSIX/POSIX.pm | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'ext') diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm index 76455f70dd..84298cb69a 100644 --- a/ext/POSIX/POSIX.pm +++ b/ext/POSIX/POSIX.pm @@ -899,6 +899,10 @@ sub rmdir { CORE::rmdir($_[0]); } +sub setbuf { + redef "IO::Handle::setbuf()"; +} + sub setgid { usage "setgid(gid)" if @_ != 1; $( = $_[0]; @@ -909,6 +913,10 @@ sub setuid { $< = $_[0]; } +sub setvbuf { + redef "IO::Handle::setvbuf()"; +} + sub sleep { usage "sleep(seconds)" if @_ != 1; CORE::sleep($_[0]); -- cgit v1.2.1