suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: dda75d30d6f0fa3998cb493ced02ae52bcb019fb
This commit is contained in:
Matthew Flatt 2001-08-01 16:28:01 +00:00
parent adbc34d59d
commit c63663a5a5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/net/smtp-unit.ss
View File

@ -58,7 +58,7 @@
(smtp-send-message server sender recipients header message-lines 25)]
[(server sender recipients header message-lines pos)
(when (null? recipients)
(error 'send-smtp-message "no recievers"))
(error 'send-smtp-message "no receivers"))
(let-values ([(r w) (if debug-via-stdio?
(values (current-input-port) (current-output-port))
(tcp-connect server pos))])