From: Robert Bohne Date: Tue, 26 Oct 2010 17:56:10 +0000 (+0200) Subject: Remove trailing spaces X-Git-Tag: v0.33~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2feb13f6ff44c67bf8a2acfa1eea15ad20e3bb86;p=p5sagit%2FExcel-Template.git Remove trailing spaces --- diff --git a/lib/Excel/Template/Element/MergeRange.pm b/lib/Excel/Template/Element/MergeRange.pm index 5b42714..ed221f3 100644 --- a/lib/Excel/Template/Element/MergeRange.pm +++ b/lib/Excel/Template/Element/MergeRange.pm @@ -13,13 +13,13 @@ BEGIN { sub render { my $self = shift; my ($context) = @_; - + my $ref_name = $context->resolve($self, 'REF'); my @refs = $context->get_all_references( $ref_name ); (@refs) - || die "You must specify a ref for MERGE_RANGE"; - + || die "You must specify a ref for MERGE_RANGE"; + my $range = Excel::Template::Element::Range->_join_refs(@refs); # NOTE: @@ -28,7 +28,7 @@ sub render { # mark any format used in a merged cell # as being specifically for a merged cell # and therefore not usable elsewhere. - + my $old_format = $context->active_format; my %values; @@ -39,15 +39,15 @@ sub render { my $format = $context->format_object->copy( $context, $old_format, %values, ); - $context->active_format($format); + $context->active_format($format); - $context->active_worksheet->merge_range( - $range, - $context->get($self, 'TEXT'), + $context->active_worksheet->merge_range( + $range, + $context->get($self, 'TEXT'), $format, ); - - $context->active_format($old_format); + + $context->active_format($old_format); return 1; }