Keep te original 'identified' callback

2014-09-03 09:59:46 +01:00
parent 7b89af5b97
commit e8ca613154
1 changed files with 2 additions and 0 deletions
--- a/lib/AnyEvent/NSQ/Reader.pm
+++ b/lib/AnyEvent/NSQ/Reader.pm
@@ -35,6 +35,8 @@ sub _parse_args {
 sub _identified {
  my ($self, $conn, $info) = @_;

+  $self->SUPER::_identified(@_);
+
  $conn->subscribe(
    $self->{topic},
    $self->{channel},