--- IO-AIO/AIO.xs	2008/04/16 16:45:18	1.113
+++ IO-AIO/AIO.xs	2008/04/26 12:00:23	1.114
@@ -1571,6 +1571,7 @@
         dREQ;
 
         req->type = REQ_CLOSE;
+        req->sv1  = newSVsv (fh);
         req->int1 = PerlIO_fileno (IoIFP (sv_2io (fh)));
 
         REQ_SEND (req);