anchor.diff:  %%                                  {stop, Reason, State}
   %% @end
   %%--------------------------------------------------------------------
  +handle_cast(stop, State) ->
  +    {stop, normal, State};
   handle_cast(_Msg, State) ->
       {noreply, State}.
   
  
positive.code:     {atomic, Result} = mnesia:transaction(T),
      Result.
  
  %% has side-effects. Will fill the ETS table 'repos'
  -spec priv_populate_repos([{binary(), binary()}]) -> [true].
  priv_populate_repos(RepoList) ->
      T = fun() ->
  
negative.code: -behaviour(gen_server).
  
  %% API
  -export([start_link/1, start/1, stop/0
          ,get_user_permissions/1
          ,add_user/2, remove_user/1, get_users/0
          ,add_repo/2, remove_repo/1, get_repos/0]).
  
  