diff options
Diffstat (limited to 't')
-rw-r--r-- | t/data/merge.json | 4 | ||||
-rw-r--r-- | t/merge.t | 5 |
2 files changed, 1 insertions, 8 deletions
diff --git a/t/data/merge.json b/t/data/merge.json index f942b33..7f384ab 100644 --- a/t/data/merge.json +++ b/t/data/merge.json @@ -26,9 +26,7 @@ [% c($row.value4, "basic", "number") %] ], %% } - [ - [% c(0, "basic", "number" ) %] - ] + [] ], "merge" : [ [% merge('Merged Header', 'basic', 'string', 0,0,0,3) %], @@ -62,11 +62,6 @@ my $data = do { local $/; local @ARGV = ('t/data/merge.json'); <> }; my $value2 = $ws->get_cell(2,0)->value; my $sum = $value1 + $value2; is($ws->get_cell(3,0)->value, $sum); - - open my $fh2, '>', 'out.xlsx'; - binmode $fh2; - $fh2->print($excel); - $fh2->close; } done_testing; |