| … | … | ||
|---|---|---|---|
| 137 | my ($self, $pl, $msg) = @_; | 137 | my ($self, $pl, $msg) = @_; |
| 138 | 138 | ||
| 139 | ext::schmorp_irc::do_notice (sprintf "[Neko-fon] %s: %s\n", $pl->ob->name, $msg); | 139 | ext::schmorp_irc::do_notice (sprintf "[Neko-fon] %s: %s\n", $pl->ob->name, $msg); |
| 140 | } | 140 | } |
| 141 | 141 | ||
| 142 | cf::register_attachment "Nekosan", package => __PACKAGE__; | 142 | cf::object::attachment "Nekosan", package => __PACKAGE__; |
| 143 | 143 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |