git send-email: avoid leaking directory file descriptors.

Signed-off-by: Pierre Habouzit <madcoder@debian.org> Signed-off-by: Junio C Hamano <gitster@pobox.com>
git-mirror · Nov 2, 2008 · 8c17868 · 8c17868
1 parent 30affa1
commit 8c17868
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/git-send-email.perl b/git-send-email.perl
@@ -407,10 +407,9 @@ sub read_config {
 
 		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";
 	}