diff options
-rwxr-xr-x | configure.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/configure.pl b/configure.pl index 6357c4461..862a47081 100755 --- a/configure.pl +++ b/configure.pl @@ -823,7 +823,8 @@ sub dir_list { my ($dir) = @_; opendir(DIR, $dir) or croak("Couldn't read directory '$dir' ($!)"); - my @listing = grep { $_ ne File::Spec->curdir() and + my @listing = grep { !/#/ and + $_ ne File::Spec->curdir() and $_ ne File::Spec->updir() } readdir DIR; closedir DIR; |