X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FExcel%2FTemplate%2FContainer%2FWorksheet.pm;h=9a789d8e55cfcb43ab9c19cc1afb85f66e8e5360;hb=bf9809e55e580ce1c7c424d68d74186aa356603f;hp=6997f85ee0b10e17e47d3051d0c68fbcfdbcdc65;hpb=1e753f77fe556d3568e999f9f1e4db533d34ef7f;p=p5sagit%2FExcel-Template.git diff --git a/lib/Excel/Template/Container/Worksheet.pm b/lib/Excel/Template/Container/Worksheet.pm index 6997f85..9a789d8 100644 --- a/lib/Excel/Template/Container/Worksheet.pm +++ b/lib/Excel/Template/Container/Worksheet.pm @@ -9,31 +9,35 @@ BEGIN { use Excel::Template::Container; } -sub exit_scope { $_[1]->active_worksheet( undef ) } +sub exit_scope { $_[1]->active_worksheet(undef) } -sub render -{ +sub render { my $self = shift; my ($context) = @_; - my $worksheet = $context->new_worksheet( $self ); + my $worksheet = $context->new_worksheet($self); my $password = $context->get( $self, 'PROTECT' ); - if (defined $password) - { - $worksheet->protect( $password ); + if ( defined $password ) { + $worksheet->protect($password); } - $worksheet->keep_leading_zeros( 1 ) - if $context->mark( 'keep_leading_zeros' ); + $worksheet->keep_leading_zeros(1) + if $context->mark('keep_leading_zeros'); if ( $context->get( $self, 'LANDSCAPE' ) && !$self->{PORTRAIT} ) { $worksheet->set_landscape; - } - elsif ( $context->get( $self, 'PORTRAIT' ) ) { + } elsif ( $context->get( $self, 'PORTRAIT' ) ) { $worksheet->set_portrait; } + + my $hide_gridlines = $context->get( $self, 'HIDE_GRIDLINES'); + + if ( defined $hide_gridlines ) { + $worksheet->hide_gridlines( $hide_gridlines ); + } + return $self->SUPER::render($context); } @@ -75,6 +79,24 @@ This activates the HIDDEN and LOCKED nodes. This will change the behavior of the worksheet to preserve leading zeros. + +=item * HIDE_GRIDLINE + +his method is used to hide the gridlines on the screen and printed page. +Gridlines are the lines that divide the cells on a worksheet. Screen and printed gridlines are +turned on by default in an Excel worksheet. If you have defined your own cell +borders you may wish to hide the default gridlines. + +$worksheet->hide_gridlines(); + +The following values of $option are valid: + + 0 : Don't hide gridlines + 1 : Hide printed gridlines only + 2 : Hide screen and printed gridlines + +If you don't supply an argument or use undef the default option is 1, i.e. only the printed gridlines are hidden. + =item * LANDSCAPE This will set the worksheet's orientation to landscape.