| … | |
… | |
| 24 | $ns->query ($flags, $text, Coro::rouse_cb); |
24 | $ns->query ($flags, $text, Coro::rouse_cb); |
| 25 | Coro::rouse_wait |
25 | Coro::rouse_wait |
| 26 | } |
26 | } |
| 27 | |
27 | |
| 28 | sub can_cleanup { |
28 | sub can_cleanup { |
| 29 | return 0; # highscore list is not cleared out, rethink |
29 | # highscore list is not cleared out, rethink |
|
|
30 | # also, admin accounts can be hacked this way, if unused for long. |
|
|
31 | return 0; |
| 30 | |
32 | |
| 31 | my ($pl, $mtime) = @_; |
33 | my ($pl, $mtime) = @_; |
| 32 | |
34 | |
| 33 | my $age = time - $mtime; |
35 | my $age = time - $mtime; |
| 34 | my $level = $pl->ob->level; |
36 | my $level = $pl->ob->level; |
