diff --git a/collects/net/nntp-unit.ss b/collects/net/nntp-unit.ss
index c4a70e2..39088b7 100644
--- a/collects/net/nntp-unit.ss
+++ b/collects/net/nntp-unit.ss
@@ -114,7 +114,7 @@
       (define send-to-server
 	(lambda (communicator message-template . rest)
 	  (apply fprintf (communicator-sender communicator)
-		 (string-append message-template "~n")
+		 (string-append message-template "\r\n")
 		 rest)))
 
       ;; parse-status-line :