fix order of args
Arthur Axel 'fREW' Schmidt [Sun, 14 Feb 2010 08:19:14 +0000 (02:19 -0600)]
lib/Log/Contextual.pm

index 165096d..6ce2431 100644 (file)
@@ -22,9 +22,9 @@ sub log_debug (&) {
       if $log->is_debug;
 }
 
-sub with_logger {
-   local $Get_Logger = $_[0];
-   $_[1]->()
+sub with_logger (&$) {
+   local $Get_Logger = $_[1];
+   $_[0]->();
 }
 
 1;