1 files changed, 22 insertions, 0 deletions
diff --git a/t/visit.t b/t/visit.t
new file mode 100644
index 0000000..1afdd7c
--- /dev/null
+++ b/t/visit.t
@@ -0,0 +1,22 @@
+use strict;
+use warnings;
+
+use Test::More tests => 3;
+
+use Path::Tiny;
+
+path('t')->visit(sub{ return [ ] });
+
+pass "visit callback doesn't choke on random returned refs";
+
+my $all;
+my $terminated;
+
+path('t')->visit(sub{ $all++ });
+
+path('t')->visit(sub{ $terminated++; return \0 if $terminated == 10 });
+
+is $terminated => 10, "terminated before the whole dir was read";
+
+cmp_ok $all, '>=', $terminated, "we have more than 10 tests in that dir";
+