From 1ac6561fdfc3e9781d9eefe91552e52e9ab10867 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Mon, 25 Oct 2010 17:56:48 -0700 Subject: [PATCH] Remove the to-do mark from test 4 in threads-dirh.t --- t/op/threads-dirh.t | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/t/op/threads-dirh.t b/t/op/threads-dirh.t index d207bc4..62e5ef7 100644 --- a/t/op/threads-dirh.t +++ b/t/op/threads-dirh.t @@ -92,10 +92,13 @@ SKIP: { seekdir $toberead, $start_pos; readdir $toberead for 1 .. @first_2+@from_thread; - is - async { readdir $toberead // 'undef' } ->join, 'undef', - 'cloned dir iterator that points to the end of the directory' - ; + { + local $::TODO; # This always passes when dir handles are not cloned. + is + async { readdir $toberead // 'undef' } ->join, 'undef', + 'cloned dir iterator that points to the end of the directory' + ; + } # Make sure the cloning code can handle file names longer than 255 chars SKIP: { -- 2.7.4