From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 2 Feb 1999 17:10:33 +0000 (+0000)
Subject: POSIX::redef setv?buf() to IO::Handle:: (by gbarr).
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a41ecaa8490fcdab7d487faf0073f6ffc801e2d2;p=p5sagit%2Fp5-mst-13.2.git

POSIX::redef setv?buf() to IO::Handle:: (by gbarr).

p4raw-id: //depot/cfgperl@2794
---

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index 76455f7..84298cb 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]);