/ 
STF-Dispatcher-PSGI-1.08
River stage one • 1 direct dependent • 1 total dependent
/ STF::Dispatcher::Test

NAME

STF::Dispatcher::Test - Basic Tests For STF Implementations

SYNOPSIS

use Test::More;
use STF::Dispatcher::Test;
}

# non-existent bucket deletion should fail
$res = $cb->(
    DELETE "http://127.0.0.1/$bucket_name-non-existent"
);
if (! is $res->code, 404, "bucket deletion request was 404") {
    diag $res->as_string;
}

# normal bucket deletion
$res = $cb->(
    DELETE "http://127.0.0.1/$bucket_name"
);
if (! is $res->code, 204, "bucket deletion request was 204") {
    diag $res->as_string;
}
}

1;

__END__

NAME

STF::Dispatcher::Test - Basic Tests For STF Implementations

SYNOPSIS

use Test::More;
use STF::Dispatcher::Test;

test_stf_impl My::STF::Impl->new;

done_testing;