diff options
| author | Simon MacMullen <simon@lshift.net> | 2008-11-27 14:24:14 +0000 |
|---|---|---|
| committer | Simon MacMullen <simon@lshift.net> | 2008-11-27 14:24:14 +0000 |
| commit | 4a39b8eac4713f733cdb84c103305fbf2f607d9e (patch) | |
| tree | 536a32d8d427989e8eff652edd6dcf69708af936 | |
| parent | f725778cfdf50f522fbabcd44ca448480df81e24 (diff) | |
| download | rabbitmq-server-4a39b8eac4713f733cdb84c103305fbf2f607d9e.tar.gz | |
Close the file after reading it.
| -rw-r--r-- | src/rabbit_memsup_linux.erl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/rabbit_memsup_linux.erl b/src/rabbit_memsup_linux.erl index 5e998dce..0d666999 100644 --- a/src/rabbit_memsup_linux.erl +++ b/src/rabbit_memsup_linux.erl @@ -127,7 +127,8 @@ code_change(_OldVsn, State, _Extra) -> %% eof. read_proc_file(File) -> {ok, IoDevice} = file:open(File, [read, raw]), - read_proc_file(IoDevice, []). + read_proc_file(IoDevice, []), + file:close(IoDevice). read_proc_file(IoDevice, Acc) -> case file:read(IoDevice, ?BUFFER_SIZE) of |