| … | |
… | |
| 292 | if ($cf::CFG{ext_login_nocheck} or $hash eq crypt $pass, $hash) { |
292 | if ($cf::CFG{ext_login_nocheck} or $hash eq crypt $pass, $hash) { |
| 293 | nuke_str $pass; |
293 | nuke_str $pass; |
| 294 | # password matches, wonderful |
294 | # password matches, wonderful |
| 295 | my $pl = cf::player::find $user or next; |
295 | my $pl = cf::player::find $user or next; |
| 296 | $pl->connect ($ns); |
296 | $pl->connect ($ns); |
|
|
297 | $pl->ob->flag (cf::FLAG_DEBUG, 1);#d# temp |
| 297 | enter_map $pl; |
298 | enter_map $pl; |
| 298 | last; |
299 | last; |
| 299 | } elsif (can_cleanup $pl, $mtime) { |
300 | } elsif (can_cleanup $pl, $mtime) { |
| 300 | Coro::Timer::sleep 1; |
301 | Coro::Timer::sleep 1; |
| 301 | |
302 | |
