anchor.diff:  %%                                      {stop, Reason, State}
   %% Description: Handling call messages
   %%--------------------------------------------------------------------
  +handle_call({can_deploy_new_app}, _From, State) ->
  +  Nodes = lists:map(fun(N) -> node(N) end, get_nodes()),
  +  {Responses, _} = rpc:multicall(Nodes, ?APP_HANDLER, can_deploy_new_app, [], timer:seconds(3)),
  +  Reply = lists:member(true, Responses),
  +  {reply, Reply, State};
   handle_call({get_seed}, _From, #state{seed = Seed} = State) ->
     {reply, Seed, State};
   handle_call({get_host}, _From, #state{host = Host} = State) ->
  
positive.code:   gen_server:call(?SERVER, {get_seed}).
  
  can_deploy_new_app() ->
    true.
  
  get_next_available_port() ->
    ?STARTING_PORT.
      
  %%====================================================================
  %% gen_server callbacks
  
negative.code:     false -> get_next_available_host()
    end.
  
  % Start with the app_launcher_fsm
  spawn_to_start_new_instance(Name, Host) ->
    {ok, P} = app_launcher_fsm:start_link(Name, Host),
    app_launcher_fsm:launch(P).