At Fri, 1 Feb 2008 09:42:23 +0100, felix winkelmann wrote: > > On Feb 1, 2008 7:35 AM, Daishi Kato <[EMAIL PROTECTED]> wrote: > > Hi, > > > > The example in the page of smtp egg doesn't work. > > I'd suggest to add a finalizer to the port generated by smtp:open. > > Or any other solution? > > It is probably easier to simply close the port properly. Sorry for the > silly mistake - I fixed the example. Thanks for pointing this out.
Thanks a lot, felix. I've been having another issue, which I finally found out what's going. When I use smtp with (tcp-buffer-size 1000), smtp:connect doesn't work. The solution would be to add flush-output. (define (send smtp fstr . args) (when (smtp-verbose smtp) (fprintf (current-error-port) "SMTP: ~?~%" fstr args)) (fprintf (smtp-out smtp) "~?\r\n" fstr args) (flush-output (smtp-out smtp) ) Daishi _______________________________________________ Chicken-users mailing list Chicken-users@nongnu.org http://lists.nongnu.org/mailman/listinfo/chicken-users