Scripts: do not descend into Private directories

2026-05-22 18:44:07 -07:00 · 2025-10-13 12:47:12 +02:00
parent 8599a8d85f
commit 43f6ca4aba
1 changed files with 1 additions and 0 deletions
@@ -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;