Merge branch 'maint'

[git.git] / git-send-email.perl

diff --git a/git-send-email.perl b/git-send-email.perl
index bdbfac66256ffc29e26f5c83531c77a18a263808..94ca5c89ad086bac754fb6b6b907fd4e968e8024 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -374,10 +374,9 @@ for my $f (@ARGV) {
 
                push @files, grep { -f $_ } map { +$f . "/" . $_ }
                                sort readdir(DH);
-
+               closedir(DH);
        } elsif (-f $f or -p $f) {
                push @files, $f;
-
        } else {
                print STDERR "Skipping $f - not found.\n";
        }