File tree 3 files changed +3
-5
lines changed
3 files changed +3
-5
lines changed Original file line number Diff line number Diff line change @@ -245,7 +245,7 @@ sub append_to_file
245
245
or die " could not write \" $filename \" : $! " ;
246
246
print $fh $str ;
247
247
close $fh ;
248
- return ;
248
+ return ;
249
249
}
250
250
251
251
# Check that all file/dir modes in a directory match the expected values,
@@ -521,7 +521,7 @@ sub command_checks_all
521
521
{
522
522
like($stderr , $re , " $test_name stderr /$re /" );
523
523
}
524
-
524
+
525
525
return ;
526
526
}
527
527
Original file line number Diff line number Diff line change 1
-
2
1
# src/tools/perlcheck/find_perl_files
3
2
4
3
# shell function to find all perl files in the source tree
@@ -11,5 +10,5 @@ find_perl_files () {
11
10
find . -type f -perm -100 -exec file {} \; -print |
12
11
egrep -i ':.*perl[0-9]*\>' |
13
12
cut -d: -f1
14
- } | sort -u | grep -v '^\./\.git/'
13
+ } | sort -u | grep -v '^\./\.git/'
15
14
}
Original file line number Diff line number Diff line change @@ -16,4 +16,3 @@ theme = core
16
16
# for now raise severity of this to level 5
17
17
[Subroutines::RequireFinalReturn]
18
18
severity = 5
19
-
You can’t perform that action at this time.
0 commit comments