anchor.diff:                      -> {ok, PublicId} | {error, invalid_macaroon}
                              when Token :: binary(),
                                   WorkerPort :: port(),
  -                                From :: pid(),
  +                                From :: {pid(), _},
                                   Timeout :: integer(),
                                   PublicId :: binary().
   p_get_token_id(Token, WorkerPort, From, Timeout) ->
  
positive.code:                                   Path :: binary(),
                                    MaxLeaseTime :: integer(),
                                    WorkerPort :: port(),
                                    From :: pid(),
                                    Timeout :: integer(),
                                    Token :: binary(),
                                    Public :: binary(),
  
negative.code:                                              OldRootHash :: binary(),
                                               NewRootHash :: binary(),
                                               RepoTag :: cvmfs_common_types:repository_tag(),
                                               From :: {pid(), _},
                                               Timeout :: integer().
  p_commit(WorkerPort, LeasePath, OldRootHash, NewRootHash, RepoTag, From, Timeout) ->
      {TagName, TagChannel, TagDescription} = RepoTag,
  