--- cvsroot/EV/EV.xs 2007/11/23 12:22:26 1.75 +++ cvsroot/EV/EV.xs 2007/11/23 13:08:56 1.76 @@ -536,9 +536,14 @@ OUTPUT: RETVAL -void once (SV *fh, int events, NV timeout, SV *cb) +void once (SV *fh, int events, SV *timeout, SV *cb) CODE: - ev_once (sv_fileno (fh), events, timeout, e_once_cb, newSVsv (cb)); + ev_once ( + sv_fileno (fh), events, + SvOK (timeout) ? SvNV (timeout) : -1., + e_once_cb, + newSVsv (cb) + ); PROTOTYPES: DISABLE