From d00cb877fdd975a6feaaf7134b7f8059ec4be590 Mon Sep 17 00:00:00 2001
From: Dominik Picheta <dominikpicheta@googlemail.com>
Date: Sun, 23 Sep 2012 01:31:49 +0100
Subject: [PATCH] Fixes sockets.recvFrom not setting length of data.

---
 lib/pure/sockets.nim | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/pure/sockets.nim b/lib/pure/sockets.nim
index 188fcb5d84..fb04d6754a 100755
--- a/lib/pure/sockets.nim
+++ b/lib/pure/sockets.nim
@@ -1227,8 +1227,9 @@ proc recvFrom*(socket: TSocket, data: var string, length: int,
   var addrLen = sizeof(sockAddress).TSockLen
   result = recvFrom(socket.fd, cstring(data), length.cint, flags.cint,
                     cast[ptr TSockAddr](addr(sockAddress)), addr(addrLen))
-  
+
   if result != -1:
+    data.setLen(result)
     address = $inet_ntoa(sockAddress.sin_addr)
     port = ntohs(sockAddress.sin_port).TPort