anchor.diff:  
   setup() ->
       DbName = ?tempdb(),
  -    {ok, _} = couch_db:create(DbName, [?ADMIN_USER]),
  +    {ok, Db} = couch_db:create(DbName, [?ADMIN_USER]),
  +    ok = couch_db:close(Db),
       FooRev = create_design_doc(DbName, <<"_design/foo">>, <<"bar">>),
       query_view(DbName, "foo", "bar"),
       BooRev = create_design_doc(DbName, <<"_design/boo">>, <<"baz">>),
  
positive.code: 
  setup_with_docs() ->
      DbName = ?tempdb(),
      {ok, _} = couch_db:create(DbName, [?ADMIN_USER]),
      create_docs(DbName),
      create_design_doc(DbName, <<"_design/foo">>, <<"bar">>),
      DbName.
  
negative.code: teardown({DbName, _}) ->
      teardown(DbName);
  teardown(DbName) when is_binary(DbName) ->
      couch_server:delete(DbName, [?ADMIN_USER]),
      ok.
  
  
  