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. cheers felix _______________________________________________ Chicken-users mailing list Chicken-users@nongnu.org http://lists.nongnu.org/mailman/listinfo/chicken-users
