From 2c2e2a07e7e64418a71a25576afc0c9687a5f367 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Wed, 26 Nov 2008 00:25:11 -0500
Subject: keys takes a hash, not hashref

---
 lib/Log/Dispatch/Channels.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
-- 
cgit v1.2.3-54-g00ecf