From 3d6978cfecf2d5b9abb078cafa4bf321a3783a1d Mon Sep 17 00:00:00 2001 From: doy Date: Wed, 26 Nov 2008 15:00:49 -0500 Subject: stupid short circuiting --- lib/Log/Dispatch/Channels.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Log/Dispatch/Channels.pm b/lib/Log/Dispatch/Channels.pm index 4caf513..ade1bfb 100644 --- a/lib/Log/Dispatch/Channels.pm +++ b/lib/Log/Dispatch/Channels.pm @@ -49,7 +49,8 @@ sub _forward_to_channels { my $ret = 0; for my $channel (@channels) { if (exists $self->{channels}{$channel}) { - $ret ||= $self->{channels}{$channel}->$method(@_); + my $methodret = $self->{channels}{$channel}->$method(@_); + $ret ||= $methodret; } else { carp "Channel $channel doesn't exist"; -- cgit v1.2.3