diff options
author | doy <doy@tozt.net> | 2008-11-26 15:00:49 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2008-11-26 15:00:49 -0500 |
commit | 3d6978cfecf2d5b9abb078cafa4bf321a3783a1d (patch) | |
tree | a1c1d3a9edaba9d09eae463de2ab88272bdaffb6 | |
parent | 86241b024ccd568a02e6b8b24e5fbf9ed19e6038 (diff) | |
download | log-dispatch-channels-3d6978cfecf2d5b9abb078cafa4bf321a3783a1d.tar.gz log-dispatch-channels-3d6978cfecf2d5b9abb078cafa4bf321a3783a1d.zip |
stupid short circuiting
-rw-r--r-- | lib/Log/Dispatch/Channels.pm | 3 |
1 files changed, 2 insertions, 1 deletions
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"; |