anchor.diff:  	 {_, _, error} ->
   	     "ERROR";
   	 {{ok, User}, {ok, Password}, {ok, Cookie}} ->
  -	     phone:insert_user_or_password(User, Password),
  -	     "CREATED";
  +	     case phone:insert_user_or_password(User, Password) of
  +		 {atomic, ok} ->
  +		     "CREATED";
  +		 _ ->
  +		     "ERROR"
  +	     end;
   	 _ ->
   	     "FORBIDDEN"
        end
  
positive.code: 
  check_auth2(Header, Env, WantAdmin) ->
      Authorization = sipheader:auth([Header]),
      io:format("in: ~p~n", [Header]),
      {value, {_, Method}} = lists:keysearch(request_method, 1, Env),
      {value, {_, URI}} = lists:keysearch(script_name, 1, Env),
      Response = dict:fetch("response", Authorization),
  
negative.code:     {Password, Flags, Classes} = get_pass(User),
      Nonce2 = sipauth:get_nonce(Opaque),
      IsAdmin = lists:member(admin, Flags),
      Response2 = sipauth:get_response(Nonce2, Method,
  				     URI,
  				     User, Password),
      Response3 = sipauth:get_response(Nonce2, "GET",
  				     URI,
  				     User, Password),
      if 
  	Password == "" ->
  	    false;
  