oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update this test for the new default content. Fix a duplicated test description.

Browse source
This commit is contained in:
Colin Kuskie 2010-08-10 10:37:06 -07:00
parent 6130165282
commit 3e95468254
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Content/SiteIndex.t
View file

@ -35,7 +35,7 @@ my $xmlData = XMLin($output,
ForceArray => ['url'], ForceArray => ['url'],
); );
my @actual_urls = map { $_->{loc} } @{ $xmlData->{urlset}->{url} }; my @actual_urls = map { $_->{loc} } @{ $xmlData->{urlset}->{url} };
my @expected_urls = map { $session->url->getSiteURL . '/' . $_ } qw{ home getting_started your_next_step the_latest_news tell_a_friend documentation site_map }; my @expected_urls = map { $session->url->getSiteURL . '/' . $_ } qw{ home getting_started your_next_step documentation join_us site_map };
cmp_deeply( cmp_deeply(
\@actual_urls, \@actual_urls,
\@expected_urls, \@expected_urls,
@ -73,9 +73,11 @@ $xmlData = XMLin($output,
ForceArray => ['url'], ForceArray => ['url'],
); );
@actual_urls = map { $_->{loc} } @{ $xmlData->{urlset}->{url} }; @actual_urls = map { $_->{loc} } @{ $xmlData->{urlset}->{url} };
@expected_urls = map { $session->url->getSiteURL . '/' . $_ } qw{ home getting_started your_next_step the_latest_news tell_a_friend documentation site_map hidden_page }; @expected_urls = map { $session->url->getSiteURL . '/' . $_ } qw{ home getting_started your_next_step documentation join_us site_map hidden_page };
use Data::Dumper;
diag Dumper \@actual_urls;
cmp_deeply( cmp_deeply(
\@actual_urls, \@actual_urls,
\@expected_urls, \@expected_urls,
'hidden pages hidden' 'hidden pages shown'
); );