anchor.diff:      "Http beehive rest server",
       {"Port", integer_to_list(Port)}
     ],
  -  
  +
     printer:banner(Settings),
  -  
  +
     Dir = ?BH_ROOT,
     Docroot = filename:join([Dir, "priv", "www"]),
  -  
  +
     WebServer = case WebServerName of
       mochiweb -> mochiweb_http;
       _ -> mochiweb_http
     end,
  -  
  +
     WebServer:start([ {port, Port},
                       {loop, fun(Req) -> dispatch_requests(WebServerName, Docroot, Req) end}]).
   
  
positive.code:   handle(Path, Docroot, Req, Resp).
  
  % Handle the requests
  handle("/favicon.ico", _Docroot, _Req, Resp) -> 
    Resp1 = Resp:status_code(200),
    Resp2 = Resp1:header("Content-Type", "text/html"),
    Resp3 = Resp2:data(""),
    Resp3:build_response();
    
  handle(Path, Docroot, Req, Resp) ->
    BaseController = lists:concat([top_level_request(Path), "_controller"]),
    CAtom = list_to_atom(BaseController),
  
negative.code: %%%-------------------------------------------------------------------
  %%% File    : rest_server.erl
  %%% Author  : Ari Lerner
  %%% Description :
  %%%
  %%% Created :  Fri Jun 26 17:14:22 PDT 2009
  %%%-------------------------------------------------------------------
  