Fixed a bug in smtp-data, that did not handle multiline input-ports correctly. Reported by RichardAlan.5112949@bloglines.com.

2004-11-18 21:48:53 +00:00 · 2004-11-18 21:48:53 +00:00 · 78d29c9337
parent 8afd6710ef
commit 78d29c9337
1 changed files with 1 additions and 1 deletions
--- 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.")))