$caller
[catagits/Catalyst-Runtime.git] / lib / Catalyst.pm
index 8db075a..d671fc2 100644 (file)
@@ -152,8 +152,8 @@ sub import {
         }
     }
 
-    unless ( $self->log ) {
-        $self->log( Catalyst::Log->new );
+    unless ( $caller->log ) {
+        $caller->log( Catalyst::Log->new );
     }
 
     # Options