anchor.diff:  %%                 ?assertException(error, function_clause, handle_content_type(not_a_tuple)),
   %%                 meck:validate(nebula2_db)
   %%        end
  -      {"Test handle_delete/5",
  -       fun () ->
  -                Child = <<"a_child">>,
  -                TestNewObject  = jsx:decode(?TestCreateContainer, [return_maps]),
  -                TestContainer = maps:put(<<"children">>, [Child], maps:put(<<"childrenrange">>, <<"0-0">>, TestNewObject)),
  -                Path = binary_to_list(maps:get(<<"parentURI">>, TestContainer)) ++ binary_to_list(maps:get(<<"objectName">>, TestContainer)),
  -                EnvMap = maps:from_list([{<<"path">>, <<"/new_container/">>},
  -                                         {<<"auth_as">>, <<"MickeyMouse">>},
  -                                         {<<"domainURI">>, <<"/new_container/">>},
  -                                         {<<"object_map">>, TestNewObject}
  -                                        ]),
  -                ChildObject = maps:from_list([{<<"objectName">>, Child},
  -                                              {<<"objectID">>, <<"id">>},
  -                                              {<<"parentID">>, maps:get(<<"objectID">>, TestNewObject)},
  -                                              {<<"parentName">>, list_to_binary(Path)}
  -                                             ]),
  -                Pid = self(),
  -                State = {Pid, EnvMap},
  -                TestRootMap = jsx:decode(?TestRootObject, [return_maps]),
  -                ParentId = maps:get(<<"objectID">>, TestNewObject),
  -                meck:sequence(nebula2_db, delete, 2, [ok, ok, {error, notfound}]),
  -                meck:sequence(nebula2_db, search, 2, [{ok, ChildObject},
  -                                                      {ok, TestNewObject}
  -                                                     ]),
  -                meck:sequence(nebula2_db, read, 2, [{ok, TestContainer},
  -                                                    {ok, TestRootMap}
  -                                                   ]),
  -                meck:sequence(nebula2_db, update, 3, [{ok, TestNewObject}]),
  -                ?assertMatch(ok, handle_delete(TestContainer, State, list_to_binary(Path), maps:get(<<"children">>, TestContainer))),
  -                ?assertMatch({error, notfound}, handle_delete(TestContainer, State, list_to_binary(Path), maps:get(<<"children">>, TestContainer))),
  -                ?assert(meck:validate(nebula2_db))
  -       end
  +%%       {"Test handle_delete/5",
  +%%        fun () ->
  +%%                 Child = <<"a_child">>,
  +%%                 TestNewObject  = jsx:decode(?TestCreateContainer, [return_maps]),
  +%%                 TestContainer = maps:put(<<"children">>, [Child], maps:put(<<"childrenrange">>, <<"0-0">>, TestNewObject)),
  +%%                 Path = binary_to_list(maps:get(<<"parentURI">>, TestContainer)) ++ binary_to_list(maps:get(<<"objectName">>, TestContainer)),
  +%%                 EnvMap = maps:from_list([{<<"path">>, <<"/new_container/">>},
  +%%                                          {<<"auth_as">>, <<"MickeyMouse">>},
  +%%                                          {<<"domainURI">>, <<"/new_container/">>},
  +%%                                          {<<"object_map">>, TestNewObject}
  +%%                                         ]),
  +%%                 ChildObject = maps:from_list([{<<"objectName">>, Child},
  +%%                                               {<<"objectID">>, <<"id">>},
  +%%                                               {<<"parentID">>, maps:get(<<"objectID">>, TestNewObject)},
  +%%                                               {<<"parentName">>, list_to_binary(Path)}
  +%%                                              ]),
  +%%                 Pid = self(),
  +%%                 State = {Pid, EnvMap},
  +%%                 TestRootMap = jsx:decode(?TestRootObject, [return_maps]),
  +%%                 ParentId = maps:get(<<"objectID">>, TestNewObject),
  +%%                 meck:sequence(nebula2_db, delete, 2, [ok, ok, {error, notfound}]),
  +%%                 meck:sequence(nebula2_db, search, 2, [{ok, ChildObject},
  +%%                                                       {ok, TestNewObject}
  +%%                                                      ]),
  +%%                 meck:sequence(nebula2_db, read, 2, [{ok, TestContainer},
  +%%                                                     {ok, TestRootMap}
  +%%                                                    ]),
  +%%                 meck:sequence(nebula2_db, update, 3, [{ok, TestNewObject}]),
  +%%                 ?assertMatch(ok, handle_delete(TestContainer, State, list_to_binary(Path), maps:get(<<"children">>, TestContainer))),
  +%%                 ?assertMatch({error, notfound}, handle_delete(TestContainer, State, list_to_binary(Path), maps:get(<<"children">>, TestContainer))),
  +%%                 ?assert(meck:validate(nebula2_db))
  +%%        end
   %%       },
   %%       {"Test make_key/0",
   %%        fun () ->
  
positive.code:     Crc = integer_to_list(crc16:crc16(Temp), 16),
      list_to_binary(string:to_lower(Uid ++ ?OID_SUFFIX ++ Crc)).
  
  -spec make_search_key(map()) -> list().
  make_search_key(Data) when is_map(Data) ->
      ?nebMsg("Entry"),
  %    ?nebFmt("Data: ~p", [Data]),
      ObjectName = binary_to_list(get_value(<<"objectName">>, Data)),
      ParentUri = binary_to_list(get_value(<<"parentURI">>, Data, <<"">>)),
      Path = binary_to_list(get_value(<<"path">>, Data, <<"">>)),
  
negative.code:                                     true ->     %% always belongs to /cdmi/system_domain
                                          <<"/cdmi_domains/system_domain/">>; 
                                      false ->
                                          get_domain_from_path(Path)
                                  end
                          end;
                      true ->
  