Address Bob's commentallow-list-for-purge-docid

1 files changed, 4 insertions, 4 deletions

diff --git a/src/couch_mrview/test/couch_mrview_purge_docs_tests.erl b/src/couch_mrview/test/couch_mrview_purge_docs_tests.erl
index da57253f1..1020607a4 100644
--- a/src/couch_mrview/test/couch_mrview_purge_docs_tests.erl
+++ b/src/couch_mrview/test/couch_mrview_purge_docs_tests.erl
@@ -108,7 +108,7 @@ test_purge_single_for_docid_with_list(Db) ->
         Rev = get_rev(FDI),
         {ok, [{ok, _PRevs}]} = couch_db:purge_docs(
             Db,
-            [{<<"UUID1">>, binary_to_list(<<"1">>), [Rev]}]
+            [{<<"UUID1">>, "1", [Rev]}]
         ),
         {ok, Db2} = couch_db:reopen(Db),
 
@@ -215,9 +215,9 @@ test_purge_complete_for_docid_with_list(Db) ->
         FDI5 = couch_db:get_full_doc_info(Db, <<"5">>), Rev5 = get_rev(FDI5),
 
         PurgeInfos = [
-            {<<"UUID1">>, binary_to_list(<<"1">>), [Rev1]},
-            {<<"UUID2">>, binary_to_list(<<"2">>), [Rev2]},
-            {<<"UUID5">>, binary_to_list(<<"5">>), [Rev5]}
+            {<<"UUID1">>, "1", [Rev1]},
+            {<<"UUID2">>, "2", [Rev2]},
+            {<<"UUID5">>, "5", [Rev5]}
         ],
         {ok, _} = couch_db:purge_docs(Db, PurgeInfos),
         {ok, Db2} = couch_db:reopen(Db),