anchor.diff:    passed.
   
   mount_t() ->
  -  beehive_bee_object:bundle([{type, rack}|git_repos_props()]),
  +  Params = [{type, rack},{deploy_env, "staging"}|git_repos_props()],
  +  beehive_bee_object:bundle(Params),
     BeeDir = filename:join([related_dir(), "run"]),
  -  beehive_bee_object:mount(#app{template = rack,
  -                                name= "beehive_bee_object_test_app"}),
  +  beehive_bee_object:mount(apps:new(Params)),
     ?assert(filelib:is_dir(BeeDir)),
     ?DEBUG_PRINT({mount_t, passed}),
  +  [{Name, Bob}|_Rest] =
  +    ets:lookup('beehive_bee_object_info',
  +               "beehive_bee_object_test_app"),
  +  ProplistBob = dict:to_list(Bob),
  +  ?assertEqual("staging", proplists:get_value(deploy_env, ProplistBob)),
     passed.
   
   start_t() ->
  
positive.code:   {started, BeeObject} = beehive_bee_object:start(#app{template=rack, name="beehive_bee_object_test_app"}, Port, Pid),
    timer:sleep(600),
    case catch gen_tcp:connect(Host, Port, [binary]) of
      {ok, Sock} -> 
        gen_tcp:close(Sock),
        beehive_bee_object:stop(BeeObject),
        ?assert(true);
      {error,econnrefused} -> 
        ?assert(false)
    end,
    ?DEBUG_PRINT({start_t, passed}),
  
negative.code:   beehive_bee_object:cleanup("beehive_bee_object_test_app"),
    ?assert(filelib:is_file(filename:join([related_dir(), "run", "beehive_bee_object_test_app"])) =:= false),
    passed.
  
  send_t() ->
    beehive_bee_object:bundle([{type, rack}|git_repos_props()]),
    timer:sleep(500),
  