anchor.diff:      {ok, _, ReturnedData} = bh_test_util:fetch_url(get, [{host, B#bee.host}, {port, B#bee.port}, {path, "/"}]),
       Body = hd(lists:reverse(ReturnedData)),
       ?assertEqual(lists:flatten(["Hello World ", B#bee.app_name]), Body)
  -  end, Bees),
  +  end, lists:reverse(Bees)),
     % Cleanup
  -  lists:map(fun({RealApp, Bee}) ->
  -    app_manager:request_to_terminate_bee(Bee, self()),
  -    timer:sleep(100),
  -    apps:delete(RealApp),
  -    receive
  -      {bee_terminated, _} -> ok;
  -      X -> erlang:display({terminate,got,else,X})
  -    end
  -  end, Bees),
  -  passed.+  terminate_bees(Bees),
  +  passed.
  +
  +start_multiple_bees_for_an_app() ->
  +  Name = lists:flatten(["multiple_bees_app"]),
  +  App = bh_test_util:dummy_app(),
  +  RealApp = App#app{name = Name},
  +  apps:save(RealApp),
  +  % Start new bees
  +  Bees = lists:map(fun(_N) ->
  +    start_new_bee_by_app(RealApp)
  +  end, lists:seq(1,1)),
  +  
  +  ?assertEqual(1, length(bees:find_all_by_name(Name))),
  +  
  +  terminate_bees(Bees),
  +  timer:sleep(100),
  +  passed.
  +
  +% HELPERS
  +start_new_bee_by_app(App) ->
  +  app_manager:request_to_start_new_bee_by_app(App, self()),
  +  receive
  +    {bee_started_normally, Bee, App} -> {App, Bee};
  +    X -> erlang:display({app_manager,request_to_start_new_bee_by_app,X})
  +  end.
  +  
  +terminate_bees([]) -> ok;
  +terminate_bees([Bee|Rest]) ->
  +  case Bee of
  +    {RealApp, RealBee} -> 
  +      terminate_bee(RealBee),
  +      apps:delete(RealApp);
  +    RealBee when is_record(RealBee, bee) -> terminate_bee(RealBee)
  +  end,
  +  terminate_bees(Rest).
  +
  +terminate_bee(Bee) when is_record(Bee, bee) ->
  +  app_manager:terminate_bee(Bee, self()).
positive.code:   % Add the router ebin
    RootDir = filename:dirname(filename:dirname((filename:dirname(code:which(?MODULE))))),
    code:add_path(filename:join([RootDir, "beehive_router", "ebin"])),
    {timeout, 3000, [fun stress_apps/0]}.
  
  stress_apps() ->
    Bees = lists:map(fun(N) ->
  
negative.code:     apps:save(RealApp),
      app_manager:request_to_start_new_bee_by_app(RealApp, self()),
      receive
        {bee_started_normally, Bee, _App} -> {RealApp, Bee}
      end
    end, lists:seq(1,5)),
    lists:map(fun({_RealApp, Bee}) ->
  