Changeset 5c6d661 for perl/modules/IRC/lib/BarnOwl/Module/IRC.pm

Timestamp:

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

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

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

Children:

736835d

Parents:

ab6d8f0

git-author:

Nelson Elhage <nelhage@mit.edu> (03/24/11 19:09:05)

git-committer:

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

Message:

IRC: Fix reconnect behavior.

File:

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

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

@@ -394 +394 @@
     my $conn = shift;
     if ($conn->conn->{socket}) {
+        $conn->did_quit(1);
         $conn->conn->disconnect("Goodbye!");
     } elsif ($conn->{reconnect_timer}) {