anchor.diff:       "</td><td>",
        "<form action=\"admin_www%3Achange_user_form\" method=post>\n",
        "<input type=\"hidden\" name=\"user\" value=\"", Elem#user.user,"\" size=\"12\">\n",
  -     "<input type=\"submit\" value=\"Change\">\n",
  +     "<input type=\"submit\" value=\"&Auml;ndra\">\n",
        "</form>\n",
        "</td></tr>\n"
        | print_users(List)].
  
positive.code: 	 _ ->
  	     ""
       end,
       "</td></tr>\n"
       | print_phones(List)].
  
  print_classes([]) ->
      "&nbsp;";
  
negative.code: 		    Numberlist = get_numbers(User),
  		    Phonelist = lists:foldl(fun (A, AccIn) ->
  						    {atomic, List} = phone:get_phone(A),
  						    lists:append(AccIn, lists:map(fun (I) ->
  											  {A, I}
  										  end, List))
  					    end, [], Numberlist),
  		    [
  		     header(ok),
  		     "<h1>", username_to_cn(User), "(", User, ")", "</h1>\n",
  		     "<h2>KTH-ID</h2>", username_to_uid(User),
  		     "<h2>Registrerade telefoner</h2>\n",
  		     "<table cellspacing=0 border=1 cellpadding=4>\n",
  		     "<tr><th>Nummer</th><th>Flaggor</th><th>Klass</th>",
  		     "<th>G&aring;r ut</th><th>Adress</th></tr>\n",
  		     print_phones_list(Phonelist),
  		     "</table>\n",
  		     "<h2>L&ouml;senord</h2>\n",
  		     "<form action=\"admin_www%3Achange_user\" method=post>\n",
  		     "<input type=\"hidden\" name=\"user\" value=\"", User, "\">\n",
  		     "<input type=\"password\" name=\"password\" size=\"20\">\n",
  