diff options
author | doy <doy@tozt.net> | 2008-11-26 00:25:11 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2008-11-26 00:25:11 -0500 |
commit | 2c2e2a07e7e64418a71a25576afc0c9687a5f367 (patch) | |
tree | cce7da47472a7520a3bced5296808b8a236a804c /lib | |
parent | e9db1cfb17c970c411decdf770aebe603c42ab72 (diff) | |
download | log-dispatch-channels-2c2e2a07e7e64418a71a25576afc0c9687a5f367.tar.gz log-dispatch-channels-2c2e2a07e7e64418a71a25576afc0c9687a5f367.zip |
keys takes a hash, not hashref
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Log/Dispatch/Channels.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Log/Dispatch/Channels.pm b/lib/Log/Dispatch/Channels.pm index aa0fd23..0ff54f4 100644 --- a/lib/Log/Dispatch/Channels.pm +++ b/lib/Log/Dispatch/Channels.pm @@ -28,7 +28,7 @@ sub new_channel { sub _forward_to_channels { my $self = shift; - my $channels = shift || [keys $self->{channels}]; + my $channels = shift || [keys %{ $self->{channels} }]; my $method = shift; # XXX: sort of a hack - the return value is only used by would_log, which |