summaryrefslogtreecommitdiff
path: root/user/perl-file-finder/fix-test.patch
diff options
context:
space:
mode:
Diffstat (limited to 'user/perl-file-finder/fix-test.patch')
-rw-r--r--user/perl-file-finder/fix-test.patch16
1 files changed, 16 insertions, 0 deletions
diff --git a/user/perl-file-finder/fix-test.patch b/user/perl-file-finder/fix-test.patch
new file mode 100644
index 000000000..6c371f6fc
--- /dev/null
+++ b/user/perl-file-finder/fix-test.patch
@@ -0,0 +1,16 @@
+Thanks @smaeul
+
+--- File-Finder-0.53/t/05-steps.t.old 2004-10-07 01:04:12.000000000 -0500
++++ File-Finder-0.53/t/05-steps.t 2018-10-02 22:27:29.867015209 -0500
+@@ -51,9 +51,9 @@
+ 'mode 755');
+
+ {
+- my $dirperm = (stat ".")[2] & 07777;
++ my $dirperm = (stat ".")[2] & 0777;
+ is_deeply([File::Finder->perm($dirperm)->in(qw(.))],
+- [fin(sub { ((stat($_))[2] & 07777) == $dirperm }, '.')],
++ [fin(sub { ((stat($_))[2] & 0777) == $dirperm }, '.')],
+ 'mode same as current directory');
+ }
+