Column Fitting: don't go higher than 15 significant digits by default.
[gnumeric.git] / test / t6507-split-panes.pl
blobb1791b924ce11b993b66bcb520eed9a544714032
1 #!/usr/bin/perl -w
2 # -----------------------------------------------------------------------------
4 use strict;
5 use lib ($0 =~ m|^(.*/)| ? $1 : ".");
6 use GnumericTest;
8 my $file = "$samples/split-panes-tests.gnumeric";
10 if (&subtest ("gnumeric")) {
11 &message ("Check split-panes gnumeric roundtrip.");
12 &test_roundtrip ($file,
13 'format' => 'Gnumeric_XmlIO:sax',
14 'ext' => "gnm");
17 if (&subtest ("ods")) {
18 &message ("Check split-panes ods roundtrip.");
19 &test_roundtrip ($file,
20 'format' => 'Gnumeric_OpenCalc:odf',
21 'ext' => "ods",
22 'filter2' => 'std:drop_generator');
25 if (&subtest ("biff7")) {
26 &message ("Check split-panes xls/BIFF7 roundtrip.");
27 &test_roundtrip ($file,
28 'format' => 'Gnumeric_Excel:excel_biff7',
29 'ext' => "xls",
30 'resize' => '16384x256',
31 'filter2' => 'std:drop_codepage');
34 if (&subtest ("biff8")) {
35 &message ("Check split-panes xls/BIFF8 roundtrip.");
36 &test_roundtrip ($file,
37 'format' => 'Gnumeric_Excel:excel_biff8',
38 'ext' => "xls",
39 'filter2' => 'std:drop_codepage');
42 if (&subtest ("xlsx")) {
43 &message ("Check split-panes xlsx roundtrip.");
44 &test_roundtrip ($file,
45 'format' => 'Gnumeric_Excel:xlsx',
46 'ext' => "xlsx",
47 'resize' => '1048576x16384');