… | … | ||
---|---|---|---|
62 | prio => -1000, | 62 | prio => -1000, |
63 | on_login => sub { | 63 | on_login => sub { |
64 | my ($pl) = @_; | 64 | my ($pl) = @_; |
65 | 65 | ||
66 | clean_timeouts $pl->ob; | 66 | clean_timeouts $pl->ob; |
67 | |||
67 | $pl->send_msg ($SAY_CHANNEL); | 68 | $pl->send_msg ($SAY_CHANNEL); |
68 | $pl->send_msg ($CHAT_CHANNEL); | 69 | $pl->send_msg ($CHAT_CHANNEL); |
69 | }, | 70 | }, |
70 | ); | 71 | ); |
71 | 72 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |