[gnumeric] Tests: add tests for cell comments.

[Morten Welinder <mortenw src gnome org>]

commit 17b4852098348332978f50ee2abce373daea8352
Author: Morten Welinder <terra gnome org>
Date:   Tue Feb 25 11:39:21 2014 -0500

    Tests: add tests for cell comments.

 samples/cell-comment-tests.gnumeric |  Bin 0 -> 3351 bytes
 test/t6506-cell-comment.pl          |   42 +++++++++++++++++++++++++++++++++++
 2 files changed, 42 insertions(+), 0 deletions(-)
---
diff --git a/samples/cell-comment-tests.gnumeric b/samples/cell-comment-tests.gnumeric
new file mode 100644
index 0000000..9bae349
Binary files /dev/null and b/samples/cell-comment-tests.gnumeric differ
diff --git a/test/t6506-cell-comment.pl b/test/t6506-cell-comment.pl
new file mode 100755
index 0000000..c4812ef
--- /dev/null
+++ b/test/t6506-cell-comment.pl
@@ -0,0 +1,42 @@
+#!/usr/bin/perl -w
+# -----------------------------------------------------------------------------
+
+use strict;
+use lib ($0 =~ m|^(.*/)| ? $1 : ".");
+use GnumericTest;
+
+my $file = "$samples/cell-comment-tests.gnumeric";
+
+&message ("Check cell-comment gnumeric roundtrip.");
+&test_roundtrip ($file,
+                'format' => 'Gnumeric_XmlIO:sax',
+                'ext' => "gnm");
+
+&message ("Check cell-comment ods roundtrip.");
+&test_roundtrip ($file,
+                'format' => 'Gnumeric_OpenCalc:odf',
+                'ext' => "ods",
+                'filter2' => "$PERL -p -e '\$_ = \"\" if m{<meta:generator>}'");
+
+my $xls_codepage_filter = "$PERL -p -e '\$_ = \"\" if m{<meta:user-defined meta:name=.msole:codepage.}'";
+
+&message ("Check cell-comment xls/BIFF7 roundtrip.");
+&test_roundtrip ($file,
+                'format' => 'Gnumeric_Excel:excel_biff7',
+                'ext' => "xls",
+                'resize' => '16384x256',
+                'filter2' => $xls_codepage_filter,
+                'ignore_failure' => 1);
+
+&message ("Check cell-comment xls/BIFF8 roundtrip.");
+&test_roundtrip ($file,
+                'format' => 'Gnumeric_Excel:excel_biff8',
+                'ext' => "xls",
+                'filter2' => $xls_codepage_filter,
+                'ignore_failure' => 1);
+
+&message ("Check cell-comment xlsx roundtrip.");
+&test_roundtrip ($file,
+                'format' => 'Gnumeric_Excel:xlsx',
+                'ext' => "xlsx",
+                'resize' => '1048576x16384');