Intermediate commit - just have to add/fix POD for two classes, then done

[p5sagit/Excel-Template.git] / lib / Excel / Template / Container / Shadow.pm

package Excel::Template::Container::Shadow;

use strict;

BEGIN {
    use vars qw(@ISA);
    @ISA = qw( Excel::Template::Container::Format );

    use Excel::Template::Container::Format;
}

sub new
{
    my $class = shift;
    my $self = $class->SUPER::new(@_);

    $self->{FONT_SHADOW} = 1;

    return $self;
}

1;
__END__

=head1 NAME

Excel::Template::Container::Shadow - Excel::Template::Container::Shadow

=head1 PURPOSE

To format all children in shadow

=head1 NODE NAME

SHADOW

=head1 INHERITANCE

Excel::Template::Container::Format

=head1 ATTRIBUTES

None

=head1 CHILDREN

None

=head1 EFFECTS

None

=head1 DEPENDENCIES

None

=head1 USAGE

  <shadow>
    ... Children here
  </shadow>

In the above example, the children will be displayed (if they are displaying
elements) in a shadow format. All other formatting will remain the same and the
"shadow"-ness will end at the end tag.

=head1 AUTHOR

Rob Kinyon (rob.kinyon@gmail.com)

=head1 SEE ALSO

FORMAT

=cut