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 (file)
--- 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]);