use XSLoader ();
-our $VERSION = "1.03" ;
+our $VERSION = "1.04" ;
# Grandfather old foo_h form to new :foo_h form
my $loaded;
redef "IO::Handle::setbuf()";
}
-sub setgid {
- usage "setgid(gid)" if @_ != 1;
- $( = $_[0];
-}
-
-sub setuid {
- usage "setuid(uid)" if @_ != 1;
- $< = $_[0];
-}
-
sub setvbuf {
redef "IO::Handle::setvbuf()";
}