diff options
| author | Hans Bolinder <[email protected]> | 2013-04-22 15:28:49 +0200 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2013-05-06 12:14:12 +0200 |
| commit | 21a7806986d58480367cff8d385a12f9659c7754 (patch) | |
| tree | cba88bf517ff4f86b86bb0d649f5204bac4d9ade /lib/kernel/src/auth.erl | |
| parent | 0dc5a00011d1d24b68c9d43ff608415f84c50499 (diff) | |
| download | otp-21a7806986d58480367cff8d385a12f9659c7754.tar.gz otp-21a7806986d58480367cff8d385a12f9659c7754.tar.bz2 otp-21a7806986d58480367cff8d385a12f9659c7754.zip | |
Fix unmatched_returns warnings in STDLIB and Kernel
Diffstat (limited to 'lib/kernel/src/auth.erl')
| -rw-r--r-- | lib/kernel/src/auth.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/kernel/src/auth.erl b/lib/kernel/src/auth.erl index 7d463103e3..eda35147d3 100644 --- a/lib/kernel/src/auth.erl +++ b/lib/kernel/src/auth.erl @@ -324,7 +324,7 @@ read_cookie(Name, Size) -> {ok, File} -> case file:read(File, Size) of {ok, List} -> - file:close(File), + ok = file:close(File), check_cookie(List, []); {error, Reason} -> make_error(Name, Reason) @@ -376,7 +376,7 @@ create_cookie(Name) -> case file:open(Name, [write, raw]) of {ok, File} -> R1 = file:write(File, Cookie), - file:close(File), + ok = file:close(File), R2 = file:raw_write_file_info(Name, make_info(Name)), case {R1, R2} of {ok, ok} -> |