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

Reply via email to