anchor.diff:      case gen_tcp:listen(Port, Opts) of
           {ok, Listen} ->
               {ok, ListenPort} = inet:port(Listen),
  -            {ok, new_acceptor(State#mochiweb_socket_server{listen=Listen, 
  +            {ok, new_acceptor(State#mochiweb_socket_server{listen=Listen,
                                                              port=ListenPort})};
           {error, Reason} ->
               {stop, Reason}
  
positive.code: 
  terminate(_Reason, #mochiweb_socket_server{listen=Listen, port=Port}) ->
      gen_tcp:close(Listen),
      case Port < 1024 of 
          true ->
              catch fdsrv:stop(),
              ok;
  
negative.code:                lists:flatten(io_lib:format("~p", [Other]))]),
              exit({error, accept_failed})
      end.
  
  
  do_get(port, #mochiweb_socket_server{port=Port}) ->
      Port.
  
  handle_call({get, Property}, _From, State) ->
      Res = do_get(Property, State),
      {reply, Res, State};
  