From 0568a0ea0f8bf115b639589f060f62d0435a956a Mon Sep 17 00:00:00 2001
From: Shunichi Shinohara <shino.shun@gmail.com>
Date: Fri, 29 Apr 2011 02:55:39 +0900
Subject: Fix file descriptor leak
File descriptors to import cover data are left opened.
When we export and import cover data many times,
leaked descriptors cause an error.
---
lib/tools/src/cover.erl | 1 +
1 file changed, 1 insertion(+)
(limited to 'lib')
diff --git a/lib/tools/src/cover.erl b/lib/tools/src/cover.erl
index 73a736f0e8..905ad895c9 100644
--- a/lib/tools/src/cover.erl
+++ b/lib/tools/src/cover.erl
@@ -662,6 +662,7 @@ main_process_loop(State) ->
Imported = do_import_to_table(Fd,File,
State#main_state.imported),
reply(From, ok),
+ file:close(Fd),
main_process_loop(State#main_state{imported=Imported});
{error,Reason} ->
reply(From, {error, {cant_open_file,File,Reason}}),
--
cgit v1.2.3