X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FLogging%2FRouter.pm;h=838da82c74b16e48a193adc363b8be7216fc5a63;hp=ee403775d4b7b69446db80702b39628974003be4;hb=49dbc3845d98d4e11314b02b75f9fb651aa7b028;hpb=b43174a123aae89a1d3666ffd4d7b9d11ad4846c diff --git a/lib/Object/Remote/Logging/Router.pm b/lib/Object/Remote/Logging/Router.pm index ee40377..838da82 100644 --- a/lib/Object/Remote/Logging/Router.pm +++ b/lib/Object/Remote/Logging/Router.pm @@ -74,7 +74,7 @@ sub handle_log_request { } sub connect { - my ($self, $destination) = @_; + my ($self, $destination, $is_weak) = @_; my $wrapped; if (ref($destination) ne 'CODE') { @@ -84,7 +84,7 @@ sub connect { } push(@{$self->_connections}, $wrapped); - weaken($self->_connections->[-1]); + weaken($self->_connections->[-1]) if $is_weak; } sub _clean_connections {