NetWare update from Ananth Kesari.

p4raw-id: //depot/perl@12376

diff --git a/NetWare/nwperlsys.h b/NetWare/nwperlsys.h
index 955e7c1..0d731d1 100644 (file)
--- a/NetWare/nwperlsys.h
+++ b/NetWare/nwperlsys.h
@@ -1300,9 +1300,7 @@ PerlSockSetservent(struct IPerlSock* piPerl, int stayopen)
 int
 PerlSockSetsockopt(struct IPerlSock* piPerl, SOCKET s, int level, int optname, const char* optval, int optlen)
 {
-       dTHX;
-    Perl_croak(aTHX_ "setsockopt not implemented!\n");
-       return 0;
+       return nw_setsockopt(s, level, optname, optval, optlen);
 }
 
 int

diff --git a/makedef.pl b/makedef.pl
index 702b604..c10eeb7 100644 (file)
--- a/makedef.pl
+++ b/makedef.pl
@@ -1052,6 +1052,7 @@ foreach my $symbol (qw(
                        nw_setnetent
                        nw_setprotoent
                        nw_setservent
+                       nw_setsockopt
                        nw_shutdown
                        nw_crypt
                        nw_execvp