From 78d29c933708c2760557be488ef771dd8ba60d3f Mon Sep 17 00:00:00 2001 From: interp Date: Thu, 18 Nov 2004 21:48:53 +0000 Subject: [PATCH] Fixed a bug in smtp-data, that did not handle multiline input-ports correctly. Reported by RichardAlan.5112949@bloglines.com. --- scheme/lib/smtp.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/lib/smtp.scm b/scheme/lib/smtp.scm index 0813528..71630f5 100644 --- a/scheme/lib/smtp.scm +++ b/scheme/lib/smtp.scm @@ -188,7 +188,7 @@ (if (not (eof-object? stuff)) (begin (write-data-line stuff p) - (newline)))))) + (lp)))))) (else (error "Message must be string or input-port.")))