anchor.diff:  		    [header(ok), "Felaktigt telefonnummer"];
   		{{ok, User}, {ok, Phone}} ->
   		    phone:insert_user(User, none, [Phone], [], Classes),
  -		    [header(redirect, "https://granit.e.kth.se:8080/erl/admin_www%3Alist_users")]
  +		    [header(redirect, userurl())]
   	    end
       end.
   
  
positive.code: 		     print_class_checkboxes(Classes),
  		     "<input type=\"submit\" value=\"ndra klasser\">\n",
  		     "</form>\n",
  		     userurl()
  		    ]
  	    end
      end.
  
negative.code:     ["Location: " ++ URL ++ "\r\n\r\n"].
  
  indexurl() ->
      sipserver:get_env(www_baseurl) ++ "index.html".
  
  userurl() ->
      sipserver:get_env(www_baseurl) ++ "erl/admin_www%3Alist_users".
  
  phonesurl() ->
      sipserver:get_env(www_baseurl) ++ "erl/admin_www%3Alist_phones".
  
  indexurl_html() ->
      "<a href=\"" ++ indexurl() ++ "\">Tillbaka till frstasidan</a>".
  
  userurl_html() ->
      "<a href=\"" ++ userurl() ++ "\">Tillbaka till anvndarlistan</a>".
  
  list_users(Env, Input) ->
      case check_auth(Env, true) of
  