anchor.diff:  	      util:sec_to_date(Expire),
   	      "</td><td>",
   	      sipurl:print(Address),
  +	      "</td><td>",
  +	      case Class of
  +		  permanent ->
  +		      [
  +		       "<form action=\"admin_www%3Adel_route\" method=post>\n",
  +		       "<input type=\"hidden\" name=\"number\" value=\"",
  +		       Number, "\">\n",
  +		       "<input type=\"submit\" value=\"Delete\">\n",
  +		       "</form>\n"
  +		      ];
  +		  _ ->
  +		      ""
  +	      end,
   	      "</td></tr>\n"
   	     ];
   	{mailbox, Status, Number2} ->
  
positive.code: 		    [header(redirect, "https://granit.e.kth.se:8080/erl/admin_www%3Alist_users")]
  	    end
      end.
  
  change_user_form(Env, Input) ->
      case check_auth(Env, true) of
  
negative.code: 	     "<tr><th>Number</th><th>Flags</th><th>Class</th>",
  	     "<th>Expire</th><th>Address</th></tr>\n",
  	     print_phones(List),
  	     "</table>\n",
  	     "<h1>Add route</h1>\n",
  	     "<form action=\"admin_www%3Aadd_route\" method=post>\n",
  	     "Number: <input type=\"text\" name=\"number\">\n",
  	     "Priority: <input type=\"text\" name=\"priority\">\n",
  	     "Address: <input type=\"text\" name=\"address\">\n",
  	     "<input type=\"submit\" value=\"Add entry\">\n",
  	     "</form>\n"
  	    ]
      end.
  
  