From 3fddaf325d5b46fb35896282a0a6bf03bd34c88d Mon Sep 17 00:00:00 2001 From: Adam Kocoloski Date: Thu, 24 Feb 2011 14:52:28 -0500 Subject: Improve the way we generate the match spec for a #db{} --- apps/couch/src/couch_server.erl | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'apps') 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 -- cgit v1.2.3