diff --git a/git-cvsimport-script b/git-cvsimport-script
index 4c0333b9290a15d6222f68b6397fc456116854cd..6d5a7fad38b128876903c96ce3badcc01001b185 100755
--- a/git-cvsimport-script
+++ b/git-cvsimport-script
@@ -317,6 +317,7 @@ sub file {
 	    $res = $self->_line($fh);
 	    die "No input: $fn $rev\n" unless defined $res;
 	}
+	close ($fh);
 
 	return ($name, $res);
 }