| … | |
… | |
| 245 | nuke_str $pass; |
245 | nuke_str $pass; |
| 246 | # password matches, wonderful |
246 | # password matches, wonderful |
| 247 | my $pl = cf::player::find $user or next; |
247 | my $pl = cf::player::find $user or next; |
| 248 | $pl->connect ($ns); |
248 | $pl->connect ($ns); |
| 249 | $pl->ob->flag (cf::FLAG_DEBUG, 1);#d# temp |
249 | $pl->ob->flag (cf::FLAG_DEBUG, 1);#d# temp |
|
|
250 | #d# Coro::Timer::sleep 60;#d# log out here to trigger DEBUG bug |
| 250 | enter_map $pl; |
251 | enter_map $pl; |
| 251 | last; |
252 | last; |
| 252 | } elsif (can_cleanup $pl, $mtime) { |
253 | } elsif (can_cleanup $pl, $mtime) { |
| 253 | Coro::Timer::sleep 1; |
254 | Coro::Timer::sleep 1; |
| 254 | |
255 | |
