diff options
| author | Jesse Luehrs <doy@tozt.net> | 2013-11-13 19:27:32 -0500 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2013-11-13 19:27:32 -0500 |
| commit | 62f2637261cec449b40f4733d47dc0b42a3fa4f1 (patch) | |
| tree | 0290e062ab4e5ea8a280549143a9bdf901d46e08 /t | |
| parent | 2a42e7cb0121f75cf122acb58ef4e6b047001084 (diff) | |
| download | spreadsheet-parsexlsx-62f2637261cec449b40f4733d47dc0b42a3fa4f1.tar.gz spreadsheet-parsexlsx-62f2637261cec449b40f4733d47dc0b42a3fa4f1.zip | |
make get_filename work (masonik)
Diffstat (limited to 't')
| -rw-r--r-- | t/bug-13.t | 11 | ||||
| -rw-r--r-- | t/data/bug-13.xlsx | bin | 0 -> 8639 bytes |
2 files changed, 11 insertions, 0 deletions
diff --git a/t/bug-13.t b/t/bug-13.t new file mode 100644 index 0000000..ded3406 --- /dev/null +++ b/t/bug-13.t @@ -0,0 +1,11 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Test::More; + +use Spreadsheet::ParseXLSX; + +my $wb = Spreadsheet::ParseXLSX->new->parse('t/data/bug-13.xlsx'); +is($wb->get_filename, 't/data/bug-13.xlsx'); + +done_testing; diff --git a/t/data/bug-13.xlsx b/t/data/bug-13.xlsx Binary files differnew file mode 100644 index 0000000..c516813 --- /dev/null +++ b/t/data/bug-13.xlsx |