Changeset 5d4262c for perl/modules/IRC/lib

Timestamp:

Apr 3, 2011, 3:06:01 PM (14 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.10, release-1.8, release-1.9

Children:

60b49a7

Parents:

3713b86

git-author:

Nelson Elhage <nelhage@mit.edu> (03/03/11 10:58:26)

git-committer:

Nelson Elhage <nelhage@mit.edu> (04/03/11 15:06:01)

Message:

Correctly grab the 'reason' field for quit messages.

File:

• perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm (modified) (1 diff)

perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm

@@ -229 +229 @@
         action     => 'quit',
         from       => $evt->{prefix},
-        reason     => $evt->{params}->[1],
+        reason     => $evt->{params}->[0],
         replycmd   => BarnOwl::quote('irc-msg', '-a', $self->alias, prefix_nick($evt)),
         replysendercmd => BarnOwl::quote('irc-msg', '-a', $self->alias, prefix_nick($evt)),