From b60335d2cd0bbfc9926e9c380809c6666f419da4 Mon Sep 17 00:00:00 2001 From: sperber Date: Tue, 21 Jan 2003 15:53:47 +0000 Subject: [PATCH] Remove some out-of-date comments. --- scheme/lib/smtp.scm | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/scheme/lib/smtp.scm b/scheme/lib/smtp.scm index 03a5a52..89d366f 100644 --- a/scheme/lib/smtp.scm +++ b/scheme/lib/smtp.scm @@ -29,17 +29,6 @@ ;;; of addresses. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -;;; Mail message to recipients in list TO-LIST. Message handed off to server -;;; running on HOST; default is the local host. Returns two values: code and -;;; text-list. However, if only problem with message is that some recipients -;;; were rejected, sendmail sends to the rest of the recipients, and the -;;; partial-success return is [700 loser-alist] where loser-alist -;;; is a list whose elements are of the form (loser-recipient code . text) -- -;;; that is, for each recipient refused by the server, you get the error -;;; data sent back for that guy. The success check is (< code 400). -;;; -;;; BODY is a list of strings or an input port. - (define (smtp-send-mail from to-list headers body . maybe-host) (call-with-current-continuation (lambda (bailout)