At Mon, 4 Feb 2008 14:45:56 +0100, felix winkelmann wrote: > > On Feb 4, 2008 12:42 PM, Daishi Kato <[EMAIL PROTECTED]> wrote: > > > > 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) ) > > > > Fixed. Thanks again.
Thanks. But we also need to add flush-output when closing the DATA port. I found it now... Daishi _______________________________________________ Chicken-users mailing list Chicken-users@nongnu.org http://lists.nongnu.org/mailman/listinfo/chicken-users
