| … | … | ||
|---|---|---|---|
| 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 | ||
| 30 | |||
| 29 | my ($pl, $mtime) = @_; | 31 | my ($pl, $mtime) = @_; |
| 30 | 32 | ||
| 31 | my $age = time - $mtime; | 33 | my $age = time - $mtime; |
| 32 | my $level = $pl->ob->level; | 34 | my $level = $pl->ob->level; |
| 33 | 35 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |