rt_facets->[1]->pass;
ok $assert_facets->[2]->pass;
## text_isnt
$assert_facets = facets assert => intercept {
$t->get_ok('/')->text_isnt('#frodo' => 'Baggins');
};
is @$assert_facets, 2;
is $asser
$assert_facets->[1]->pass;
$assert_facets = facets assert => intercept {
$t->get_ok('/')->text_isnt('#sam' => 'Gamgee');
};
is @$assert_facets, 2;
is $assert_facets->[1]->details, 'no match for sel
Django (Python)';
ok !$assert_facets->[1]->pass;
## header_isnt
$assert_facets = facets assert => intercept {
$t->get_ok('/')->header_isnt('server' => 'Django (Python)');
};
is @$assert_facets, 2;
ssert_facets->[1]->pass;
$assert_facets = facets assert => intercept {
$t->get_ok('/')->header_isnt('server' => 'Mojolicious (Perl)');
};
is @$assert_facets, 2;
is $assert_facets->[1]->details, 'no
t/html';
ok !$assert_facets->[1]->pass;
## content_type_isnt
$assert_facets = facets assert => intercept {
$t->get_ok('/')->content_type_isnt('text/html');
};
is @$assert_facets, 2;
is $assert_face
facets->[1]->pass;
$assert_facets = facets assert => intercept {
$t->get_ok('/')->content_type_isnt('text/html;charset=UTF-8');
};
is @$assert_facets, 2;
is $assert_facets->[1]->details, 'not Conte
ls, 'redirected';
ok !$assert_facets->[3]->pass;
## status_isnt
$assert_facets = facets assert => intercept {
$t->get_ok('/')->status_isnt(200);
};
is @$assert_facets, 2;
is $assert_facets->[1]->de
ssert_facets->[1]->pass;
$assert_facets = facets assert => intercept {
$t->get_ok('/')->status_isnt(404);
};
is @$assert_facets, 2;
is $assert_facets->[1]->details, 'not 404 Not Found';
ok !$assert
h for content';
ok !$assert_facets->[3]->pass;
## content_isnt
$assert_facets = facets assert => intercept {
$t->get_ok('/')->content_isnt('Oops!');
};
is @$assert_facets, 2;
is $assert_facets->[1]
sert_facets->[1]->pass;
$assert_facets = facets assert => intercept {
$t->get_ok('/')->content_isnt("Oops!\n");
};
is @$assert_facets, 2;
is $assert_facets->[1]->details, 'no match for content';
ok
iker = $t->app->moniker;
$t->app(__PACKAGE__->new->moniker('Test'));
is $t->app->moniker, 'Test';
isnt $moniker, 'Test';
my @methods = qw(delete get head options patch post put);
my $events = interc