Prevent File::Find from changing directory, which was breaking tests within the wanted function

1 files changed, 1 insertions, 1 deletions

diff --git a/checkem b/checkem
index f4dcdfb..aa43e70 100755
--- a/checkem
+++ b/checkem
@@ -96,7 +96,7 @@ sub wanted {
 }
 
 # ... and start the find process on the directory!
-find \&wanted, $dir;
+find {'wanted' => \&wanted, no_chdir => 1}, $dir;
 
 # Get a sorted list of the sizes keys by filesize. This groups them nicely.
 my @files_sorted = sort {$sizes{$a} <=> $sizes{$b}} keys %sizes;