| … | |
… | |
| 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 |
|
|
| 251 | enter_map $pl; |
250 | enter_map $pl; |
| 252 | last; |
251 | last; |
| 253 | } elsif (can_cleanup $pl, $mtime) { |
252 | } elsif (can_cleanup $pl, $mtime) { |
| 254 | Coro::Timer::sleep 1; |
253 | Coro::Timer::sleep 1; |
| 255 | |
254 | |
