* ext/socket/socket.c (sockaddr_obj): fill pfamily.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@22211 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,7 @@
+Tue Feb 10 21:14:43 2009  Tanaka Akira  <akr@fsij.org>
+
+	* ext/socket/socket.c (sockaddr_obj): fill pfamily.
+
 Tue Feb 10 21:09:23 2009  Tanaka Akira  <akr@fsij.org>
 
 	* ext/socket/option.c (sockopt_s_bool): new method.

ext/socket/socket.c

@@ -1432,7 +1432,7 @@ sockaddr_obj(struct sockaddr *addr)
 	len = SA_LEN(addr);
 #endif
 
-    return addrinfo_new(addr, len, 0, 0, 0, Qnil, Qnil);
+    return addrinfo_new(addr, len, addr->sa_family, 0, 0, Qnil, Qnil);
 }
 #endif