anchor.diff:  %% @doc Look up a directory and set a new context.
   load(Directory, DirectoryData)
   		when is_list(Directory), is_list(DirectoryData) ->
  +erlang:display({?MODULE, ?LINE}),
   	mod_auth:load(Directory, DirectoryData).
   
   -spec store(Options, Config) -> Result
  
positive.code: 	end.
  
  require(#mod{parsed_header = ParsedHeader} = Info, Directory, DirectoryData) ->
  	 {_, ValidUsers}  = lists:keyfind(require_user, 1, DirectoryData),
  	{_, ValidGroups} = lists:keyfind(require_group, 1, DirectoryData),
  	case ValidGroups of
  		false when ValidUsers =:= false ->
  			authorized;
  		_ ->
  			case lists:keyfind("authorization", 1, ParsedHeader) of
  				false ->
  					authorization_required(DirectoryData);
  				{_, "Bearer" ++ EncodedString} = Credentials ->
  					case string:tokens(EncodedString, ".") of
  						[EncodedHeader, EncodedPayload, EncodedSignature] ->
  							require1(Info, Directory, DirectoryData, ValidUsers, ValidGroups,
  									EncodedHeader, EncodedPayload, EncodedSignature);
  						_ ->
  
negative.code: 		Result :: {proceed, #mod{}}.
  handle_auth(#mod{data = Data, config_db = ConfigDb} = Info,
  		Directory, DirectoryData, _AuthType) ->
  erlang:display({?MODULE, ?LINE}),
  	case require(Info, Directory, DirectoryData) of
  		authorized ->
  erlang:display({?MODULE, ?LINE}),
  			{proceed, Data};
  		{authorized, User} ->
  erlang:display({?MODULE, ?LINE}),
  			{proceed, [{remote_user, User} | Data]};
  		{authorization_required, Realm} ->
  erlang:display({?MODULE, ?LINE}),
  			Message = httpd_util:message(401, none, ConfigDb),
  			{proceed,
  					[{response, {401, ["WWW-Authenticate: Bearer realm=\"",Realm,
  