Set the default protocol family to be INET

rakudo · Feb 16, 2011 · ef3f3fa · ef3f3fa
1 parent 4f5299c
commit ef3f3fa
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/IO/Socket/INET.pm b/src/core/IO/Socket/INET.pm
@@ -18,7 +18,7 @@ module PIO {
 
 class IO::Socket::INET is Cool does IO::Socket {
 
-    method open (Str $hostname, Int $port, Int :$protocol = PIO::PROTO_TCP, Int :$family = 0) {
+    method open (Str $hostname, Int $port, Int :$protocol = PIO::PROTO_TCP, Int :$family = PIO::PF_INET) {
         my $addr = IO::Socket::INET.getaddrinfo(
                 $hostname,
                 $port,
@@ -60,7 +60,7 @@ class IO::Socket::INET is Cool does IO::Socket {
         }}) );
     }
 
-    method bind (Str $hostname, Int $port, Int :$protocol = PIO::PROTO_TCP, Int :$family = 0) {
+    method bind (Str $hostname, Int $port, Int :$protocol = PIO::PROTO_TCP, Int :$family = PIO::PF_INET) {
         my $addr = IO::Socket::INET.getaddrinfo(
                 $hostname,
                 $port,