diff options
author | A. Wilcox <AWilcox@Wilcox-Tech.com> | 2018-10-03 03:28:54 +0000 |
---|---|---|
committer | A. Wilcox <AWilcox@Wilcox-Tech.com> | 2018-10-03 03:28:54 +0000 |
commit | 75ad34513e7be0eb1877e304e52e9f7ee9229425 (patch) | |
tree | 886fd3ffe02ce35dee4ed4b65278b4549f3ee741 /user/perl-file-finder/fix-test.patch | |
parent | 112b3506f43d44f10ccf6d61dd9c758c4d005dae (diff) | |
download | packages-75ad34513e7be0eb1877e304e52e9f7ee9229425.tar.gz packages-75ad34513e7be0eb1877e304e52e9f7ee9229425.tar.bz2 packages-75ad34513e7be0eb1877e304e52e9f7ee9229425.tar.xz packages-75ad34513e7be0eb1877e304e52e9f7ee9229425.zip |
user/perl-file-finder: fix test, thanks @smaeul
Diffstat (limited to 'user/perl-file-finder/fix-test.patch')
-rw-r--r-- | user/perl-file-finder/fix-test.patch | 16 |
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'); + } + |