Scripts: do not descend into Private directories

This commit is contained in:
Franco Fichtner 2025-10-13 12:47:12 +02:00
parent 8599a8d85f
commit 43f6ca4aba

View file

@ -67,6 +67,7 @@ sub process_file
my $filename = $File::Find::name;
return if not -f "$cwd/$filename";
return if $filename =~ /\/Private\//;
my @lines = read_file( "$cwd/$filename" );
my $possibly_bsd;