App-CatalystStarter-Bloated
view release on metacpan or search on metacpan
t/initializr/process_zip.t view on Meta::CPAN
note( "HIGH LEVEL FUNCTIONS" );
## setup index
note( "mangle index.html into wrapper.tt2" );
lives_ok {App::CatalystStarter::Bloated::Initializr::_setup_index()}
"index process complets alive";
## check that index.html doesn't exist
## (should be renamed to wrapper.tt2 by now)
is( search_one( qr/index\.html$/, 1), undef, "index.html not in archive" );
ok( search_one( qr/wrapper\.tt2$/ ), "wrapper.tt2 *is* in archive" );
## sanity checks on wrapper
my $w = content( qr/wrapper\.tt2$/ );
like( $w, qr(<!DOCTYPE html>), "wrapper contains doctype html" );
like( $w, qr([% content %]), "wrapper contains content tt var" );
( run in 1.168 second using v1.01-cache-2.11-cpan-b888b73be4d )