#!/usr/bin/env perl use MJB::Web::Test; #== # Initialize Testing Database #== MJB::Web::Test::enable_testing_database(); #== # This test ensures that the blog index (info tab) page loads, # and that correct blog is loaded into the stash.. #== my $t = Test::Mojo::MJB->new('MJB::Web'); my $blog_id = $t->create_user ->post_ok( '/blog/domain', form => { domain => 'blog.example.com', calling_route => 'show_blog_domain_owned', }) ->get_ok( '/dashboard' ) ->stash->{blogs}->[0]->id; $t->get_ok( "/dashboard/blog/$blog_id" ) ->status_is( 200 ) ->code_block( sub { my $self = shift; ok exists $self->stash->{blog}, "The blog loads!"; is $self->stash->{blog}->domain->name, 'blog.example.com', "Correct domain name for id."; }); #== # Remove Jekyll blog repos that were created as a part of this test. #== $t->clear_tempdir; done_testing;