diff options
-rw-r--r-- | lib/Spreadsheet/Template/Writer/Excel.pm | 9 | ||||
-rw-r--r-- | t/merge.t | 1 | ||||
-rw-r--r-- | t/template.t | 2 |
3 files changed, 2 insertions, 10 deletions
diff --git a/lib/Spreadsheet/Template/Writer/Excel.pm b/lib/Spreadsheet/Template/Writer/Excel.pm index f77e898..da54cea 100644 --- a/lib/Spreadsheet/Template/Writer/Excel.pm +++ b/lib/Spreadsheet/Template/Writer/Excel.pm @@ -1,13 +1,6 @@ package Spreadsheet::Template::Writer::Excel; -BEGIN { - $Spreadsheet::Template::Writer::Excel::AUTHORITY = 'cpan:DOY'; -} -{ - $Spreadsheet::Template::Writer::Excel::VERSION = '0.01'; -} use Moose::Role; -use Data::Dumper; use Class::Load 'load_class'; use List::Util 'first'; @@ -191,7 +184,7 @@ sub _write_cell { } my $format; - if ($data->{format}) { + if (exists $data->{format}) { my %border = ( thin => 1, ); @@ -12,7 +12,6 @@ my $template = Spreadsheet::Template->new; my $data = do { local $/; local @ARGV = ('t/data/merge.json'); <> }; { - my $excel = $template->render( $data, { diff --git a/t/template.t b/t/template.t index 63ddf34..86d5005 100644 --- a/t/template.t +++ b/t/template.t @@ -7,7 +7,7 @@ use Spreadsheet::ParseXLSX; use Spreadsheet::Template; my $template = Spreadsheet::Template->new; -my $data = do { local $/; local @ARGV = ('t/data/merge.json'); <> }; +my $data = do { local $/; local @ARGV = ('t/data/template.json'); <> }; { my $excel = $template->render( $data, |