--- config/auto/headers.pl.orig Mon Oct 13 12:55:22 2003
+++ config/auto/headers.pl      Mon Oct 13 12:49:44 2003
@@ -28,7 +28,7 @@
     # some headers may not be probed-for by perl 5, or might not be
     # properly reflected in %Config (i_fcntl seems to be wrong on my machine,
     # for instance).
-    my @extra_headers = qw(malloc.h fcntl.h setjmp.h pthread.h signal.h arpa/inet.h sysexit.h);
+    my @extra_headers = qw(malloc.h fcntl.h setjmp.h pthread.h signal.h arpa/inet.h sysexit.h sys/socket.h);

     foreach my $header (@extra_headers) {
         my $flag = "i_$header";
--- include/parrot/parrot.h.orig        Mon Oct 13 12:55:46 2003
+++ include/parrot/parrot.h     Mon Oct 13 12:53:39 2003
@@ -65,7 +65,7 @@
 #  include <sys/types.h>
 #endif

-#ifdef PARROT_HAS_HEADER_SYSSOCKIO
+#ifdef PARROT_HAS_HEADER_SYSSOCKET
 #include <sys/socket.h>
 #endif