[catagits/XML-Feed.git] / t / 08-convert-summary-bug.t

# $Id$

use strict;
use Test::More tests => 1;
use XML::Feed;
use XML::Feed::Entry;

my $feed = XML::Feed->new();
$feed->title('My Feed');
$feed->link('http://www.example.com/');
$feed->description('Wow!');

my $entry = XML::Feed::Entry->new();
$entry->title('Foo Bar');
$entry->link('http://www.example.com/foo/bar.html');
$entry->content('This is the content, but there is no summary.');
$entry->author('Foo Baz');

$feed->add_entry($entry);


unlike($feed->convert('Atom')->as_xml(), qr{<summary>},
       'no summary tag after converting to Atom');
Commit	Line	Data
f7c452ee	1	# $Id$
	2
	3	use strict;
	4	use Test::More tests => 1;
	5	use XML::Feed;
	6	use XML::Feed::Entry;
	7
	8	my $feed = XML::Feed->new();
	9	$feed->title('My Feed');
	10	$feed->link('http://www.example.com/');
	11	$feed->description('Wow!');
	12
	13	my $entry = XML::Feed::Entry->new();
	14	$entry->title('Foo Bar');
	15	$entry->link('http://www.example.com/foo/bar.html');
	16	$entry->content('This is the content, but there is no summary.');
	17	$entry->author('Foo Baz');
	18
	19	$feed->add_entry($entry);
	20
	21
	22	unlike($feed->convert('Atom')->as_xml(), qr{<summary>},
	23	'no summary tag after converting to Atom');