__PACKAGE__->mk_classdata($_) for qw/_config log/;
-our $VERSION = '4.32';
+our $VERSION = '4.33';
our @ISA;
=head1 NAME
}
}
- unless ( $self->log ) {
- $self->log( Catalyst::Log->new );
+ unless ( $caller->log ) {
+ $caller->log( Catalyst::Log->new );
}
# Options
$caller->log->debug(qq/Loaded engine "$engine"/) if $caller->debug;
}
+=item $c->log
+
+Contains the logging object. Unless it is already set Catalyst sets this up with a
+C<Catalyst::Log> object. To use your own log class:
+
+ $c->log( MyLogger->new );
+ $c->log->info("now logging with my own logger!");
+
+Your log class should implement the methods described in the C<Catalyst::Log>
+man page.
+
+
=back
=head1 SUPPORT