diff options
Diffstat (limited to 'src/couch/test/eunit/couch_db_doc_tests.erl')
-rw-r--r-- | src/couch/test/eunit/couch_db_doc_tests.erl | 46 |
1 files changed, 21 insertions, 25 deletions
diff --git a/src/couch/test/eunit/couch_db_doc_tests.erl b/src/couch/test/eunit/couch_db_doc_tests.erl index 916b63207..dc1ac79e6 100644 --- a/src/couch/test/eunit/couch_db_doc_tests.erl +++ b/src/couch/test/eunit/couch_db_doc_tests.erl @@ -18,7 +18,6 @@ start() -> test_util:start_couch([ioq]). - setup() -> DbName = ?tempdb(), config:set("couchdb", "stem_interactive_updates", "false", false), @@ -26,21 +25,21 @@ setup() -> couch_db:close(Db), DbName. - teardown(DbName) -> ok = couch_server:delete(DbName, [?ADMIN_CTX]), ok. - couch_db_doc_test_() -> { "CouchDB doc tests", { setup, - fun start/0, fun test_util:stop_couch/1, + fun start/0, + fun test_util:stop_couch/1, { foreach, - fun setup/0, fun teardown/1, + fun setup/0, + fun teardown/1, [ fun should_truncate_number_of_revisions/1, fun should_raise_bad_request_on_invalid_rev/1, @@ -50,7 +49,6 @@ couch_db_doc_test_() -> } }. - should_truncate_number_of_revisions(DbName) -> DocId = <<"foo">>, Db = open_db(DbName), @@ -60,7 +58,6 @@ should_truncate_number_of_revisions(DbName) -> {ok, [{ok, #doc{revs = {11, Revs}}}]} = open_doc_rev(Db, DocId, Rev10), ?_assertEqual(5, length(Revs)). - should_raise_bad_request_on_invalid_rev(DbName) -> DocId = <<"foo">>, InvalidRev1 = <<"foo">>, @@ -70,18 +67,15 @@ should_raise_bad_request_on_invalid_rev(DbName) -> Db = open_db(DbName), create_doc(Db, DocId), [ - {InvalidRev1, - ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev1, 1))}, - {InvalidRev2, - ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev2, 1))}, - {InvalidRev3, - ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev3, 1))} + {InvalidRev1, ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev1, 1))}, + {InvalidRev2, ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev2, 1))}, + {InvalidRev3, ?_assertThrow(Expect, add_revisions(Db, DocId, InvalidRev3, 1))} ]. should_allow_access_in_doc_keys_test(_DbName) -> Json = <<"{\"_id\":\"foo\",\"_access\":[\"test\"]}">>, EJson = couch_util:json_decode(Json), - Expected = {[{<<"_id">>,<<"foo">>}, {<<"_access">>, [<<"test">>]}]}, + Expected = {[{<<"_id">>, <<"foo">>}, {<<"_access">>, [<<"test">>]}]}, EJson = Expected, Doc = couch_doc:from_json_obj(EJson), NewEJson = couch_doc:to_json_obj(Doc, []), @@ -91,31 +85,33 @@ open_db(DbName) -> {ok, Db} = couch_db:open_int(DbName, [?ADMIN_CTX]), Db. - create_doc(Db, DocId) -> add_revision(Db, DocId, undefined). - open_doc_rev(Db0, DocId, Rev) -> {ok, Db} = couch_db:reopen(Db0), couch_db:open_doc_revs(Db, DocId, [couch_doc:parse_rev(Rev)], []). - add_revision(Db, DocId, undefined) -> add_revision(Db, DocId, []); add_revision(Db, DocId, Rev) when is_binary(Rev) -> add_revision(Db, DocId, [{<<"_rev">>, Rev}]); add_revision(Db0, DocId, Rev) -> {ok, Db} = couch_db:reopen(Db0), - Doc = couch_doc:from_json_obj({[ - {<<"_id">>, DocId}, - {<<"value">>, DocId} - ] ++ Rev}), + Doc = couch_doc:from_json_obj({ + [ + {<<"_id">>, DocId}, + {<<"value">>, DocId} + ] ++ Rev + }), {ok, NewRev} = couch_db:update_doc(Db, Doc, []), couch_doc:rev_to_str(NewRev). - add_revisions(Db, DocId, Rev, N) -> - lists:foldl(fun(_, OldRev) -> - add_revision(Db, DocId, OldRev) - end, Rev, lists:seq(1, N)). + lists:foldl( + fun(_, OldRev) -> + add_revision(Db, DocId, OldRev) + end, + Rev, + lists:seq(1, N) + ). |