Sancaros/egs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

psu_game: Remove the NPC characters and stop the party on quit.

Browse Source
This commit is contained in:
Loïc Hoguin 2010-08-27 15:02:53 +02:00
parent 8db82f8260
commit 09de3c245e
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/psu/psu_game.erl
View File

@ -38,9 +38,18 @@ start_link(Port) ->
%% @spec cleanup(Pid) -> ok %% @spec cleanup(Pid) -> ok
%% @doc Cleanup the data associated with the failing process. %% @doc Cleanup the data associated with the failing process.
%% @todo Cleanup the instance process if there's nobody in it anymore. %% @todo Cleanup the instance process if there's nobody in it anymore.
%% @todo Leave party instead of stopping it.
cleanup(Pid) -> cleanup(Pid) ->
case egs_user_model:read({pid, Pid}) of case egs_user_model:read({pid, Pid}) of
{ok, User} -> {ok, User} ->
case User#egs_user_model.partypid of
undefined ->
ignore;
PartyPid ->
{ok, NPCList} = psu_party:get_npc(PartyPid),
[egs_user_model:delete(NPCGID) || {_Spot, NPCGID} <- NPCList],
psu_party:stop(PartyPid)
end,
egs_user_model:delete(User#egs_user_model.id), egs_user_model:delete(User#egs_user_model.id),
{ok, List} = egs_user_model:select({neighbors, User}), {ok, List} = egs_user_model:select({neighbors, User}),
lists:foreach(fun(Other) -> Other#egs_user_model.pid ! {psu_player_unspawn, User} end, List), lists:foreach(fun(Other) -> Other#egs_user_model.pid ! {psu_player_unspawn, User} end, List),