############################################################################### # # Tests for Excel::Writer::XLSX::Chart methods. # # reverse('(c)'), September 2010, John McNamara, jmcnamara@cpan.org # use lib 't/lib'; use TestFunctions qw(_new_object); use strict; use warnings; use Excel::Writer::XLSX::Chart::Area; use Test::More tests => 1; ############################################################################### # # Tests setup. # my $expected; my $caption; my $got; my $obj = _new_object( \$got, 'Excel::Writer::XLSX::Chart::Area' ); ############################################################################### # # Test the _write_xml_declaration() method. # $caption = " \tApp: _write_xml_declaration()"; $expected = qq(\n); $obj->_write_xml_declaration(); is( $got, $expected, $caption ); __END__