… | |
… | |
1166 | $pl->invoke (cf::EVENT_PLAYER_QUIT); |
1166 | $pl->invoke (cf::EVENT_PLAYER_QUIT); |
1167 | $pl->ns->destroy if $pl->ns; |
1167 | $pl->ns->destroy if $pl->ns; |
1168 | |
1168 | |
1169 | my $path = playerdir $pl; |
1169 | my $path = playerdir $pl; |
1170 | my $temp = "$path~$cf::RUNTIME~deleting~"; |
1170 | my $temp = "$path~$cf::RUNTIME~deleting~"; |
1171 | IO::AIO::aio_rename $path, $temp, sub { |
1171 | Coro::AIO::aio_rename $path, $temp; |
1172 | delete $cf::PLAYER{$pl->ob->name}; |
1172 | delete $cf::PLAYER{$pl->ob->name}; |
1173 | $pl->destroy; |
1173 | $pl->destroy; |
1174 | |
|
|
1175 | IO::AIO::aio_rmtree $temp; |
1174 | IO::AIO::aio_rmtree $temp; |
1176 | }; |
|
|
1177 | } |
1175 | } |
1178 | |
1176 | |
1179 | =item $player->ext_reply ($msgid, $msgtype, %msg) |
1177 | =item $player->ext_reply ($msgid, $msgtype, %msg) |
1180 | |
1178 | |
1181 | Sends an ext reply to the player. |
1179 | Sends an ext reply to the player. |