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:     Ret = ["WWW-Authenticate: " ++ sipheader:auth_print(Auth, Stale) ++ "\r\n",
  	   "Status: 401 Authenticate\r\n",
  	   "Content-type: text/html\r\n\r\n"],
      Ret;
  
  header(redirect, URL) ->
  