From cad5e1f1ef75c2338171916b7cb76549a2f6ffad Mon Sep 17 00:00:00 2001
From: Brad Anderson <brad@cloudant.com>
Date: Thu, 27 May 2010 12:41:31 -0400
Subject: delete_db working

---
 src/fabric_delete.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/fabric_delete.erl b/src/fabric_delete.erl
index 674f09ad..9a65f72b 100644
--- a/src/fabric_delete.erl
+++ b/src/fabric_delete.erl
@@ -59,7 +59,7 @@ handle_delete_msg(_, ok, {_NotFound, N}) ->
 delete_fullmap(DbName) ->
     case couch_db:open(<<"dbs">>, []) of
     {ok, Db} ->
-        couch_api:open_doc(Db, DbName, nil, []),
-        couch_api:update_doc(Db, DbName, {[{<<"_deleted">>,true}]});
+        {ok, Doc} = couch_api:open_doc(Db, DbName, nil, []),
+        couch_api:update_doc(Db, Doc#doc{deleted=true});
     Error -> Error
     end.
-- 
cgit v1.2.3