anchor.diff:      end.
   
   %% @doc Process the top-level elements of the
  --spec process_acl_contents([xmlElement()], acl(), pid()) -> acl().
  +-spec process_acl_contents([xmlElement()], acl(), pid()) -> #acl_v2{}.
   process_acl_contents([], Acl, _) ->
       Acl;
   process_acl_contents([HeadElement | RestElements], Acl, RiakPid) ->
       Content = HeadElement#xmlElement.content,
  -    lager:debug("Element name: ~p", [HeadElement#xmlElement.name]),
  +    _ = lager:debug("Element name: ~p", [HeadElement#xmlElement.name]),
       ElementName = HeadElement#xmlElement.name,
       case ElementName of
           'Owner' ->
  
positive.code: process_grant([HeadElement | RestElements], Grant, RiakPid) ->
      Content = HeadElement#xmlElement.content,
      ElementName = HeadElement#xmlElement.name,
      lager:debug("ElementName: ~p", [ElementName]),
      lager:debug("Content: ~p", [Content]),
      case ElementName of
          'Grantee' ->
              UpdGrant = process_grantee(Content, Grant, RiakPid);
          'Permission' ->
              UpdGrant = process_permission(Content, Grant);
          _ ->
              lager:debug("Encountered unexpected grant element: ~p", [ElementName]),
              UpdGrant = Grant
      end,
      process_grant(RestElements, UpdGrant, RiakPid).
  
negative.code:     grants_xml(Grantees, []).
  
  %% @doc Assemble the xml for the set of grantees for an acl.
  -spec grants_xml([acl_grant()], list()) -> list().
  grants_xml([], Acc) ->
      lists:flatten(Acc);
  grants_xml([HeadGrantee | RestGrantees], Acc) ->
  