diff --git a/irc.lamb b/irc.lamb
index 7112d65..7663b48 100644
--- a/irc.lamb
+++ b/irc.lamb
@@ -177,7 +177,7 @@ handleMessage(s, nick, chan, msg) -> s.
 
 handleCommand(s, _, "PING", [ping]) -> do
 	putstrln("ping: " + ping);
-	fputstr(sock, "PONG :" + ping);
+	fputstr(sock, "PONG :" + ping + "\r\n");
 	s
 end.