Changeset 18381 for lang/perl/mobirc/trunk/lib/App/Mobirc/Plugin/Component/IRCClient.pm

Timestamp:

08/28/08 13:52:41 (4 months ago)

Author:

tokuhirom

Message:

link to rt ticket

Files:

• lang/perl/mobirc/trunk/lib/App/Mobirc/Plugin/Component/IRCClient.pm (modified) (1 diff)

lang/perl/mobirc/trunk/lib/App/Mobirc/Plugin/Component/IRCClient.pm

@@ -12 +12 @@
     # POE::Filter::IRC::Compat->get_one returns undef when invalid CTCP request.
     # POE::Filter::Stackable dies when get the undef!
+    # see also http://rt.cpan.org/Ticket/Display.html?id=38773
     my $meta = Class::MOP::Class->initialize('POE::Filter::IRC::Compat') or die "cannot get meta class of the POE::Filter::IRC::Compat";
     $meta->add_around_method_modifier('get_one', sub {