summaryrefslogtreecommitdiff
path: root/apps
diff options
context:
space:
mode:
authorAdam Kocoloski <adam@cloudant.com>2011-02-24 14:52:28 -0500
committerAdam Kocoloski <adam@cloudant.com>2011-02-24 14:52:28 -0500
commit3fddaf325d5b46fb35896282a0a6bf03bd34c88d (patch)
tree56d79a82f5fa6d3a8e251031aa219fdbe48eb868 /apps
parent2a969e21732f9a53f60ce478af1537bf7f19588e (diff)
Improve the way we generate the match spec for a #db{}
Diffstat (limited to 'apps')
-rw-r--r--apps/couch/src/couch_server.erl4
1 files changed, 1 insertions, 3 deletions
diff --git a/apps/couch/src/couch_server.erl b/apps/couch/src/couch_server.erl
index 4441fd16..bfbe9c09 100644
--- a/apps/couch/src/couch_server.erl
+++ b/apps/couch/src/couch_server.erl
@@ -353,9 +353,7 @@ code_change(_OldVsn, State, _Extra) ->
handle_info({'EXIT', _Pid, config_change}, Server) ->
{stop, config_change, Server};
handle_info({'EXIT', Pid, Reason}, #server{dbs_open=DbsOpen}=Server) ->
- Match = erlang:make_tuple(tuple_size(#db{}), '_', [{1, db},
- {#db.main_pid, Pid}]),
- case ets:match_object(couch_dbs, Match) of
+ case ets:match_object(couch_dbs, #db{main_pid=Pid, _='_'}) of
[#db{name = DbName, compactor_pid=Froms}] ->
?LOG_INFO("db ~s died with reason ~p", [DbName, Reason]),
% icky hack of field values - compactor_pid used to store clients