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

Convert another WEBGUI_LIVE test.

Browse source
This commit is contained in:
Colin Kuskie 2011-12-01 14:25:57 -08:00
parent d672c3a221
commit ec0b35cda5
1 changed files with 6 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

14
t/Asset/Wobject/GalleryAlbum/rss.t
View file

@ -14,11 +14,12 @@ use strict;
## The goal of this test is to test the rss view of GalleryAlbums ## The goal of this test is to test the rss view of GalleryAlbums
use WebGUI::Test; use WebGUI::Test;
use WebGUI::Test::Mechanize;
use WebGUI::Session; use WebGUI::Session;
use Test::More; use Test::More;
use Test::Deep; use Test::Deep;
use XML::Simple; use XML::Simple;
plan skip_all => 'set WEBGUI_LIVE to enable this test' unless $ENV{WEBGUI_LIVE}; #plan skip_all => 'set WEBGUI_LIVE to enable this test' unless $ENV{WEBGUI_LIVE};
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
# Init # Init
@ -83,16 +84,11 @@ if ( !eval { require Test::WWW::Mechanize; 1; } ) {
plan skip_all => 'Cannot load Test::WWW::Mechanize. Will not test.'; plan skip_all => 'Cannot load Test::WWW::Mechanize. Will not test.';
} }
$mech = Test::WWW::Mechanize->new; $mech = Test::WWW::Mechanize->new;
$mech->get( $baseUrl );
if ( !$mech->success ) {
plan skip_all => "Cannot load URL '$baseUrl'. Will not test.";
}
plan tests => 1;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
# Test www_viewRss # Test www_viewRss
$mech = Test::WWW::Mechanize->new; $mech = WebGUI::Test::Mechanize->new( config => WebGUI::Test->file );
$mech->get_ok('/', 'initialize mech object with session');
my $url = $session->url->getSiteURL . $session->url->makeAbsolute( $album->getUrl('func=viewRss') ); my $url = $session->url->getSiteURL . $session->url->makeAbsolute( $album->getUrl('func=viewRss') );
$mech->get( $url ); $mech->get( $url );
cmp_deeply( cmp_deeply(
@ -117,3 +113,5 @@ cmp_deeply(
}, },
"RSS Datastructure is complete and correct", "RSS Datastructure is complete and correct",
); );
done_testing;