| … | |
… | |
| 497 | |
497 | |
| 498 | if ($cleanly) { |
498 | if ($cleanly) { |
| 499 | $_->ob->message ("$name left the game.", cf::NDI_DK_ORANGE | cf::NDI_UNIQUE) for cf::player::list; |
499 | $_->ob->message ("$name left the game.", cf::NDI_DK_ORANGE | cf::NDI_UNIQUE) for cf::player::list; |
| 500 | } else { |
500 | } else { |
| 501 | $_->ob->message ("$name uncerimoniously disconnected.", cf::NDI_DK_ORANGE | cf::NDI_UNIQUE) for cf::player::list; |
501 | $_->ob->message ("$name uncerimoniously disconnected.", cf::NDI_DK_ORANGE | cf::NDI_UNIQUE) for cf::player::list; |
| 502 | warn "unclean\n" unless safe_spot $pl;#d# |
|
|
| 503 | $pl->{unclean_save} = $cf::RUNTIME |
502 | $pl->{unclean_save} = $cf::RUNTIME |
| 504 | unless safe_spot $pl; |
503 | unless safe_spot $pl; |
| 505 | } |
504 | } |
| 506 | }, |
505 | }, |
| 507 | ); |
506 | ); |
