diff options
-rwxr-xr-x | utils/scan-build | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/scan-build b/utils/scan-build index 6e57fe3944..f5f5f54bb0 100755 --- a/utils/scan-build +++ b/utils/scan-build @@ -144,7 +144,7 @@ sub GetHTMLRunDir { my $max = 0; opendir(DIR, $Dir); - my @FILES= readdir(DIR); + my @FILES = grep { -d "$Dir/$_" } readdir(DIR); closedir(DIR); foreach my $f (@FILES) { |