Changeset 851a0e0 for perl/modules/IRC/lib/BarnOwl/Module/IRC.pm

Timestamp:

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

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.8, release-1.9

Children:

249bbbe

Parents:

4787581

git-author:

Nelson Elhage <nelhage@mit.edu> (02/26/11 20:06:50)

git-committer:

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

Message:

IRC: Remove circular references between ::Connection and its Client.

File:

• perl/modules/IRC/lib/BarnOwl/Module/IRC.pm (modified) (2 diffs)

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

@@ -389 +389 @@
         timeout   => sub {0}
        });
+    $ircnets{$alias} = $conn;
     return;
 }
@@ -395 +396 @@
     my $cmd = shift;
     my $conn = shift;
-    if ($conn->conn->is_connected) {
+    if ($conn->conn->{socket}) {
         $conn->conn->disconnect("Goodbye!");
     } elsif ($reconnect{$conn->alias}) {