Added more tests and fixed formats to work correctly w/multiple templates.
[p5sagit/Excel-Template.git] / t / Register_018.pm
CommitLineData
e976988f 1package Register_018;
2
3use strict;
4
5sub render
6{
7 my ($self, $context) = @_;
8
9 my $old_format = $context->active_format;
9ee3aea0 10 my $format = $context->format_object->copy(
e976988f 11 $context, $old_format,
12
13 align => 'center', bold => 1,
14 );
15
16 $context->active_format($format);
17
18 my $child_success = $self->SUPER::render($context);
19
20 $context->active_format($old_format);
21
22 return $child_success;
23
24}
25
261;
27__END__