view release on metacpan or  search on metacpan

t/mojolicious/layouted_lite_app.t  view on Meta::CPAN

};

subtest '"0" inline template' => sub {
  $t->get_ok('/inline/again')->status_is(200)->header_is(Server => 'Mojolicious (Perl)')->content_is("0\n");
};

subtest '"0" data' => sub {
  $t->get_ok('/data')->status_is(200)->header_is(Server => 'Mojolicious (Perl)')->content_is(0);
};

subtest 'Variants (desktop)' => sub {
  $t->get_ok('/variants.txt')
    ->status_is(200)
    ->content_type_is('text/plain;charset=UTF-8')
    ->content_is('Variant: Desktop!');
};

subtest 'Variants (tablet)' => sub {
  $t->get_ok('/variants.txt?device=tablet')
    ->status_is(200)
    ->content_type_is('text/plain;charset=UTF-8')
    ->content_is('Variant: Tablet!');
};

subtest 'Variants (desktop fallback)' => sub {
  $t->get_ok('/variants.txt?device=phone')
    ->status_is(200)
    ->content_type_is('text/plain;charset=UTF-8')
    ->content_is('Variant: Desktop!');
};

subtest 'Variants ("0")' => sub {
  $t->get_ok('/variants.txt?device=0')
    ->status_is(200)
    ->content_type_is('text/plain;charset=UTF-8')