--- deliantra/server/server/cfperl.xs 2006/12/30 18:45:28 1.117 +++ deliantra/server/server/cfperl.xs 2006/12/30 20:32:30 1.118 @@ -2115,13 +2115,13 @@ maptile::players () PPCODE: if (GIMME_V == G_SCALAR) - XPUSHs (to_sv (THIS->players)); + XPUSHs (sv_2mortal (to_sv (THIS->players))); else if (GIMME_V == G_ARRAY) { EXTEND (SP, THIS->players); for_all_players (pl) if (pl->ob && pl->ob->map == THIS) - PUSHs (to_sv (pl->ob)); + PUSHs (sv_2mortal (to_sv (pl->ob))); } void play_sound_map (maptile *map, int x, int y, int sound_num)