diff --git a/t/1.t b/t/1.t index 17b3b89..73b5322 100644 --- a/t/1.t +++ b/t/1.t @@ -14,12 +14,22 @@ is ($dw->getDepth(), 0); ok ($dw->setDepth(1)); is ($dw->getDepth(), 1); -ok ($dw->setHandler(onBeginWalk => sub { SUCCESS })); -ok ($dw->setHandler(onLink => sub { SUCCESS })); -ok ($dw->setHandler(onFile => sub { SUCCESS })); -ok ($dw->setHandler(onDirEnter => sub { SUCCESS })); -ok ($dw->setHandler(onDirLeave => sub { SUCCESS })); +ok ($dw->onBeginWalk(sub {})); +ok ($dw->onLink(sub {})); +ok ($dw->onFile(sub {})); +ok ($dw->onDirEnter(sub {})); +ok ($dw->onDirLeave(sub {})); +dies_ok {$dw->onBeginWalk(0)}; +dies_ok {$dw->onLink(0)}; +dies_ok {$dw->onFile(0)}; +dies_ok {$dw->onDirEnter(0)}; +dies_ok {$dw->onDirLeave(0)}; +ok ($dw->setHandler(onBeginWalk => sub {})); +ok ($dw->setHandler(onLink => sub {})); +ok ($dw->setHandler(onFile => sub {})); +ok ($dw->setHandler(onDirEnter => sub {})); +ok ($dw->setHandler(onDirLeave => sub {})); dies_ok {$dw->setHandler(onBeginWalk => 0)}; dies_ok {$dw->setHandler(onLink => 0)}; dies_ok {$dw->setHandler(onFile => 0)};