home *** CD-ROM | disk | FTP | other *** search
- package Log::Log4perl::Layout;
-
-
- use Log::Log4perl::Layout::SimpleLayout;
- use Log::Log4perl::Layout::PatternLayout;
-
-
- ####################################################
- sub appender_name {
- ####################################################
- my ($self, $arg) = @_;
-
- if ($arg) {
- die "setting appender_name unimplemented until it makes sense";
- }
- return $self->{appender_name};
- }
-
-
- ##################################################
- sub define {
- ##################################################
- ; #subclasses may implement
- }
-
-
- ##################################################
- sub render {
- ##################################################
- die "subclass must implement render";
- }
-
- 1;
-
- __END__
-
- =head1 NAME
-
- Log::Log4perl::Layout - Log4perl Layout Virtual Base Class
-
- =head1 SYNOPSIS
-
- # Not to be used directly, see below
-
- =head1 DESCRIPTION
-
- C<Log::Log4perl::Layout> is a virtual base class for the two currently
- implemented layout types
-
- Log::Log4perl::Layout::SimpleLayout
- Log::Log4perl::Layout::PatternLayout
-
- Unless you're implementing a new layout class for Log4perl, you shouldn't
- use this class directly, but rather refer to
- L<Log::Log4perl::Layout::SimpleLayout> or
- L<Log::Log4perl::Layout::PatternLayout>.
-
- =head1 SEE ALSO
-
- =head1 AUTHOR
-
- Kevin Goess, <cpan@goess.org>
- Mike Schilli, <m@perlmeister.com>
-
- =cut
-