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

make sure something is returned

Browse source
This commit is contained in:
Doug Bell 2010-07-28 17:56:43 -05:00 • committed by Colin Kuskie
parent 2ccbdf4e19
commit 9d6463f1e7
1 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
t/Asset/dispatch.t
View file

@ -59,7 +59,7 @@ WebGUI::Test->addToCleanup( $tag );
#----------------------------------------------------------------------------
# Tests
plan tests => 7; # Increment this number for each test you create
plan tests => 9; # Increment this number for each test you create
#----------------------------------------------------------------------------
# Test dispatch
@ -81,9 +81,13 @@ is( $td->dispatch, "www_edit", "dispatch handles ?func= query param" );
is( $td->dispatch( '/foo' ), "bar", "overridden dispatch trumps ?func= query param" );
# Test func= can only be run on the exact asset we requested
isnt( $td->dispatch( '/bar' ), "www_edit", "?func= dispatch cancelled because of unhandled fragment" );
my $output = $td->dispatch( '/bar' );
ok( $output, "dispatch returned something, maybe not found page?" );
isnt( $output, "www_edit", "?func= dispatch cancelled because of unhandled fragment" );
$session->request->setup_body( { } );
isnt( $td->dispatch( '/bar' ), "www_view", "?func= dispatch cancelled because of unhandled fragment" );
$output = $td->dispatch( '/bar' );
ok( $output, "dispatch returned something, maybe not found page?" );
isnt( $output, "www_view", "?func= dispatch cancelled because of unhandled fragment" );
#vim:ft=perl