… | … | ||
---|---|---|---|
73 | } | 73 | } |
74 | 74 | ||
75 | 1 | 75 | 1 |
76 | }; | 76 | }; |
77 | 77 | ||
78 | cf::register_attachment board => | 78 | cf::object::attachment board => |
79 | on_apply => sub { | 79 | on_apply => sub { |
80 | my ($npc, $who) = @_; | 80 | my ($npc, $who) = @_; |
81 | $who->reply ($npc, "Hello, i'm a talking board, 'say help' to get help"); | 81 | $who->reply ($npc, "Hello, i'm a talking board, 'say help' to get help"); |
82 | do_list ($npc->name, $who, $npc); | 82 | do_list ($npc->name, $who, $npc); |
83 | cf::override; | 83 | cf::override; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |