X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FObject%2FRemote%2FLogging%2FRouter.pm;fp=lib%2FObject%2FRemote%2FLogging%2FRouter.pm;h=15bd2519c12dea76badb965ae63f30010e4d7234;hb=572a9a00cec239943f92157ec39c44398aad137f;hp=46b6da79e02190e2ff9c1959a2041d931282a4fa;hpb=a663aea54e2f4167d60dad19083cc7a078cfd04b;p=scpubgit%2FObject-Remote.git

diff --git a/lib/Object/Remote/Logging/Router.pm b/lib/Object/Remote/Logging/Router.pm
index 46b6da7..15bd251 100644
--- a/lib/Object/Remote/Logging/Router.pm
+++ b/lib/Object/Remote/Logging/Router.pm
@@ -17,7 +17,7 @@ sub after_import { }
 sub _get_loggers {
   my ($self, %metadata) = @_;
   my $package = $metadata{caller_package};
-  my $level = $metadata{log_level};
+  my $level = $metadata{message_level};
   my $is_level = "is_$level";
   my $need_clean = 0;
   my @loggers;
@@ -62,7 +62,7 @@ sub _deliver_message {
   my @loggers = $self->_get_loggers(%message_info);
   my $generator = $message_info{message_sub};
   my $args = $message_info{message_args};
-  my $level = $message_info{log_level};
+  my $level = $message_info{message_level};
   
   return unless @loggers > 0;
   #this is the point where the user provided log message code block is executed
@@ -74,7 +74,7 @@ sub _deliver_message {
 
 sub handle_log_request {
   my ($self, %message_info) = @_;
-  my $level = $message_info{log_level};
+  my $level = $message_info{message_level};
   my $package = $message_info{caller_package};
   my $need_clean = 0;