use Test::More 'tests' => 6;
use Dancer::Test;

use strict;
use warnings;

my $not_redirected_content = 'gotcha';

{
    package Webapp;
    use Dancer;

    get '/' => sub { 
        "home";
    };

    get '/cond_bounce' => sub {
        if(params->{'bounce'}) {
            redirect '/';
            return;
        }

        $not_redirected_content;
    };
}

my $req = [GET => '/cond_bounce', { bounce => 1 }];
response_exists $req, "response for /cond_bounce, with bounce param";
response_status_is $req, 302, 'status is 302';
response_content_is $req, '', 'content is empty when bounced';

$req = [GET => '/cond_bounce'];
response_exists $req, "response for /cond_bounce without bounce param";
response_status_is $req, 200, 'status is 200';
response_content_is $req, $not_redirected_content, 'content is not empty';