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 | |
| parent | e9db1cfb17c970c411decdf770aebe603c42ab72 (diff) | |
| download | log-dispatch-channels-2c2e2a07e7e64418a71a25576afc0c9687a5f367.tar.gz log-dispatch-channels-2c2e2a07e7e64418a71a25576afc0c9687a5f367.zip | |
keys takes a hash, not hashref
| -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 |