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

This commit is contained in:
interp 2004-11-18 21:48:53 +00:00
parent 8afd6710ef
commit 78d29c9337
1 changed files with 1 additions and 1 deletions

View File

@ -188,7 +188,7 @@
(if (not (eof-object? stuff)) (if (not (eof-object? stuff))
(begin (begin
(write-data-line stuff p) (write-data-line stuff p)
(newline)))))) (lp))))))
(else (error "Message must be string or input-port."))) (else (error "Message must be string or input-port.")))