factor: remove rest of double paren words.

[factor.git] / basis / io / sockets / windows / windows.factor

diff --git a/basis/io/sockets/windows/windows.factor b/basis/io/sockets/windows/windows.factor
index a6856330f6c55d771c3480a4db80d1128daa08bc..c80ba6004f449bbf840b775b5e4f51940454677a 100755 (executable)
--- a/basis/io/sockets/windows/windows.factor
+++ b/basis/io/sockets/windows/windows.factor
@@ -67,7 +67,7 @@ M: object (get-remote-address) ( socket addrspec -- sockaddr )
 : bind-socket ( win32-socket sockaddr len -- )
     [ handle>> ] 2dip bind socket-error ;
 
-M: object ((client)) ( addrspec -- handle )
+M: object remote>handle ( addrspec -- handle )
     [ SOCK_STREAM open-socket ] keep
     [
         bind-local-address get