blob: 6c371f6fc1b4d9b98a59161a08616d4b38d960dc (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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');
}
|
