… | |
… | |
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 | |