… | … | ||
---|---|---|---|
22 | } | 22 | } |
23 | } | 23 | } |
24 | } | 24 | } |
25 | } | 25 | } |
26 | 26 | ||
27 | cf::attach_to_players | 27 | cf::player->attach ( |
28 | prio => -1000, | 28 | prio => -1000, |
29 | on_login => sub { | 29 | on_login => sub { |
30 | my ($pl) = @_; | 30 | my ($pl) = @_; |
31 | 31 | ||
32 | clean_timeouts $pl->ob; | 32 | clean_timeouts $pl->ob; |
33 | }, | 33 | }, |
34 | ; | 34 | ); |
35 | 35 | ||
36 | cf::register_command listen => sub { | 36 | cf::register_command listen => sub { |
37 | my ($who, $msg) = @_; | 37 | my ($who, $msg) = @_; |
38 | my $player = cf::player::find $who->name; | 38 | my $player = cf::player::find $who->name; |
39 | 39 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |