--- EV/EV.xs	2007/10/27 19:11:27	1.8
+++ EV/EV.xs	2007/10/29 07:24:37	1.9
@@ -329,6 +329,26 @@
 	OUTPUT:
         RETVAL
 
+Event timed_io (SV *fh, short events, double timeout, SV *cb)
+	ALIAS:
+        timed_io_ns = 1
+	CODE:
+{
+        events = timeout ? events & ~EV_PERSIST : events | EV_PERSIST;
+
+        RETVAL = e_new (fh, events, cb);
+
+        if (timeout)
+	  {
+            RETVAL->timeout  = timeout;
+            RETVAL->interval = 1;
+          }
+
+        if (!ix) e_start (RETVAL);
+}
+	OUTPUT:
+        RETVAL
+
 Event timer (double after, int repeat, SV *cb)
 	ALIAS:
         timer_ns = 1
@@ -438,14 +458,15 @@
 
 SV *fh (Event ev, SV *new_fh = 0)
 	ALIAS:
-        signal = 0
+        signal = 1
 	CODE:
         RETVAL = newSVsv (ev->fh);
         if (items > 1)
           {
             if (ev->active) event_del (&ev->ev);
             sv_setsv (ev->fh, new_fh);
-            ev->ev.ev_fd = sv_fileno (ev->fh);
+            ev->ev.ev_fd  = sv_fileno (ev->fh);
+            ev->ev.ev_events = signal ? ev->ev.ev_events | EV_SIGNAL : ev->ev.ev_events & ~EV_SIGNAL;
             if (ev->active) event_add (&ev->ev, e_tv (ev));
           }
 	OUTPUT: