diff options
author | Ingela Anderton Andin <[email protected]> | 2011-01-20 16:00:28 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2011-01-20 16:00:28 +0100 |
commit | 4c70b07402581cbcdc1204961344cb28bf383d20 (patch) | |
tree | dbc7cd3d708cd78b4f4e130c6370e588d4e4e026 /lib/ssl/src/ssl_certificate_db.erl | |
parent | e0120ba9ae60392cff67d7f17649353f516b1ab3 (diff) | |
parent | 6deca2a989772f261b59f11da031832f1ea9c45d (diff) | |
download | otp-4c70b07402581cbcdc1204961344cb28bf383d20.tar.gz otp-4c70b07402581cbcdc1204961344cb28bf383d20.tar.bz2 otp-4c70b07402581cbcdc1204961344cb28bf383d20.zip |
Merge branch 'maint-r14' into dev
Diffstat (limited to 'lib/ssl/src/ssl_certificate_db.erl')
-rw-r--r-- | lib/ssl/src/ssl_certificate_db.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/ssl/src/ssl_certificate_db.erl b/lib/ssl/src/ssl_certificate_db.erl index f34459de37..3eceefa304 100644 --- a/lib/ssl/src/ssl_certificate_db.erl +++ b/lib/ssl/src/ssl_certificate_db.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2007-2010. All Rights Reserved. +%% Copyright Ericsson AB 2007-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -122,8 +122,8 @@ cache_pem_file(Pid, File, Time, [CertsDb, _FileToRefDb, PidToFileDb]) -> %% but with different content. %% -------------------------------------------------------------------- uncache_pem_file(File, [_CertsDb, _FileToRefDb, PidToFileDb]) -> - [Pids] = select(PidToFileDb, [{{'$1', File},[],['$$']}]), - lists:foreach(fun(Pid) -> + Pids = select(PidToFileDb, [{{'$1', File},[],['$$']}]), + lists:foreach(fun([Pid]) -> exit(Pid, shutdown) end, Pids). |