anchor.diff:  get_object_oid(Path, State) when is_binary(Path), is_tuple(State) ->
       get_object_oid(binary_to_list(Path), State);
   get_object_oid(Path, State) when is_list(Path), is_tuple(State) ->
  -    ?nebMsg("Entry"),
  +%   ?nebMsg("Entry"),
       RealPath = case beginswith(Path, "/cdmi_capabilities/") of
                      true ->
                          get_domain_hash(<<"">>) ++ Path;
  
positive.code: -spec type_of(term()) -> boolean().
  type_of(X) ->
      if
          is_atom(X) ->
              <<"atom">>;
          is_binary(X) ->
              <<"binary">>;
          is_bitstring(X) ->
              <<"bitstring">>;
          is_boolean(X) ->
              <<"boolean">>;
          is_float(X) ->
              <<"float">>;
          is_function(X) ->
  
negative.code: %% Update Metadata
  -spec update_data_system_metadata(list(), map(), cdmi_state()) -> map().
  update_data_system_metadata(CList, Data, State) when is_list(CList), is_map(Data), is_tuple(State) ->
  %    ?nebMsg("Entry"),
      CapabilitiesURI = get_value(<<"capabilitiesURI">>, Data, []),
      update_data_system_metadata(CList, Data, CapabilitiesURI, State).
  
  -spec update_data_system_metadata(list(),map(), binary() | string(), cdmi_state()) -> map().
  update_data_system_metadata(_, Data, [], _) when is_map(Data)->
  %    ?nebMsg("Entry"),
      Data;
  update_data_system_metadata(CList, Data, CapabilitiesURI, State) when is_binary(CapabilitiesURI) ->
      update_data_system_metadata(CList, Data, binary_to_list(CapabilitiesURI), State);
  update_data_system_metadata(CList, Data, CapabilitiesURI, State) ->
  %    ?nebMsg("Entry"),
      Domain = get_domain_hash(<<"">>),
      {ok, C1} = nebula2_db:search(Domain ++ CapabilitiesURI, State),
      Capabilities = get_value(<<"capabilities">>, C1),
  