From f269c49f1d1172fc390f6d54bb79d4841f15adee Mon Sep 17 00:00:00 2001 From: Filipe David Borba Manana Date: Wed, 10 Aug 2011 22:01:33 +0000 Subject: Revert couch_server changes added in revision 1156361 Leaving the tests however since it doesn't hurt. git-svn-id: https://svn.apache.org/repos/asf/couchdb/branches/1.1.x@1156385 13f79535-47bb-0310-9956-ffa450edef68 --- src/couchdb/couch_server.erl | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) (limited to 'src/couchdb') diff --git a/src/couchdb/couch_server.erl b/src/couchdb/couch_server.erl index b9503d2f..7870d69e 100644 --- a/src/couchdb/couch_server.erl +++ b/src/couchdb/couch_server.erl @@ -314,13 +314,11 @@ handle_call({open, DbName, Options}, {FromPid,_}=From, Server) -> {reply, couch_db:open_ref_counted(MainPid, FromPid), Server} end; handle_call({create, DbName, Options}, From, Server) -> - FileName = get_full_filename(Server, ?b2l(DbName)), - case file:open(FileName, [read]) of - {ok, Fd} -> - ok = file:close(Fd), - {reply, file_exists, Server}; - Error -> - open_db(DbName, Server, [create | Options], From) + case ets:lookup(couch_dbs_by_name, DbName) of + [] -> + open_db(DbName, Server, [create | Options], From); + [_AlreadyRunningDb] -> + {reply, file_exists, Server} end; handle_call({delete, DbName, _Options}, _From, Server) -> DbNameList = binary_to_list(DbName), -- cgit v1.2.3