1d9ea654e9
where the default COMPILE_DIR already exists and is owned by another user or not writable for some other reason by the testing user.
157 lines
3.1 KiB
Perl
157 lines
3.1 KiB
Perl
#!/usr/bin/env perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
BEGIN { $ENV{MOJO_MODE}='testing'; };
|
|
|
|
use utf8;
|
|
|
|
use Test::More tests => 39;
|
|
|
|
use Mojolicious::Lite;
|
|
use Mojo::ByteStream 'b';
|
|
use Test::Mojo;
|
|
use File::Temp qw( tempdir );
|
|
|
|
# Silence
|
|
app->log->level('fatal');
|
|
|
|
use_ok('Mojolicious::Plugin::TtRenderer::Engine');
|
|
|
|
plugin 'tt_renderer' => {template_options => {PRE_CHOMP => 1, POST_CHOMP => 1, TRIM => 1, COMPILE_DIR => tempdir( CLEANUP => 1 ) }};
|
|
|
|
get '/exception' => 'error';
|
|
|
|
get '/with_include' => 'include';
|
|
|
|
get '/with_wrapper' => 'wrapper';
|
|
|
|
get '/badinclude' => 'badinclude';
|
|
|
|
get '/badwrapper' => 'badwrapper';
|
|
|
|
get '/with_auto_wrapper' => 'auto_wrapper';
|
|
|
|
get '/inheritance_base' => 'inheritance_base';
|
|
|
|
get '/inheritance_derived' => 'inheritance_derived';
|
|
|
|
get '/unicode' => 'unicode';
|
|
|
|
get '/helpers' => 'helpers';
|
|
|
|
get '/unknown_helper' => 'unknown_helper';
|
|
|
|
get '/on-disk' => 'foo';
|
|
|
|
get '/bar/:message' => 'bar';
|
|
|
|
get '/inline' => sub { shift->render(inline => '[% 1 + 1 %]', handler => 'tt') };
|
|
|
|
my $t = Test::Mojo->new;
|
|
|
|
# Exception
|
|
$t->get_ok('/exception')->status_is(500)->content_like(qr/Exception/i);
|
|
|
|
# Normal rendering
|
|
$t->get_ok('/bar/hello')->content_is("hello");
|
|
|
|
# With include
|
|
$t->get_ok('/with_include')->content_is("HelloInclude!Hallo");
|
|
|
|
# Bad inclde
|
|
$t->get_ok('/badinclude')->status_is(500)->content_like(qr/Exception/i)->content_like(qr/bogus\.inc/);
|
|
|
|
# Bad wrapper
|
|
$t->get_ok('/badwrapper')->status_is(500)->content_like(qr/Exception/i)->content_like(qr/layouts\/bogus\.html\.tt/);
|
|
|
|
# With wrapper
|
|
$t->get_ok('/with_wrapper')->content_is("wrapped");
|
|
|
|
# With auto wrapper
|
|
$t->get_ok('/with_auto_wrapper')->content_is("wrapped");
|
|
|
|
# Inheritance
|
|
$t->get_ok('/inheritance_base')->content_is("untouched");
|
|
$t->get_ok('/inheritance_derived')->content_is("edited");
|
|
|
|
# Unicode
|
|
$t->get_ok('/unicode')->content_is("привет");
|
|
|
|
# Helpers
|
|
$t->get_ok('/helpers')->content_is("/helpers");
|
|
|
|
# Unknown helper
|
|
$t->get_ok('/unknown_helper')->status_is(500)->content_like(qr//);
|
|
|
|
# On Disk
|
|
$t->get_ok('/on-disk')->content_is("4");
|
|
|
|
# Not found
|
|
$t->get_ok('/not_found')->status_is(404)->content_like(qr/not found/i);
|
|
|
|
# Inline
|
|
$t->get_ok('/inline')->status_is(200)->content_is('2');
|
|
|
|
__DATA__
|
|
|
|
@@ bar.html.tt
|
|
[% message %]
|
|
|
|
@@ error.html.tt
|
|
[% 1 + % %]
|
|
|
|
@@ include.inc
|
|
Hello
|
|
|
|
@@ includes/sub/include.inc
|
|
Hallo
|
|
|
|
@@ include.html.tt
|
|
[%- INCLUDE 'include.inc' -%]
|
|
Include!
|
|
[% INCLUDE 'includes/sub/include.inc' -%]
|
|
|
|
@@ badinclude.html.tt
|
|
[%- INCLUDE 'bogus.inc' -%]
|
|
not here
|
|
|
|
@@ layouts/layout.html.tt
|
|
w[%- content -%]d
|
|
|
|
@@ wrapper.html.tt
|
|
[%- WRAPPER 'layouts/layout.html.tt' -%]
|
|
rappe
|
|
[%- END -%]
|
|
|
|
@@ badwrapper.html.tt
|
|
[%- WRAPPER 'layouts/bogus.html.tt' %-]
|
|
not here
|
|
[%- END -%]
|
|
|
|
@@ layouts/auto_layout.html.tt
|
|
w[%- h.content -%]d
|
|
|
|
@@ auto_wrapper.html.tt
|
|
[% CALL h.layout('auto_layout') %]
|
|
rappe
|
|
|
|
@@ inheritance_base.html.tt
|
|
[% verb = BLOCK %]untouch[% END %]
|
|
[% h.content('verb', verb) %]ed
|
|
|
|
@@ inheritance_derived.html.tt
|
|
[% CALL h.extends('inheritance_base') %]
|
|
[% verb = BLOCK %]edit[% END %]
|
|
[% h.content('verb', verb) %]
|
|
|
|
@@ unicode.html.tt
|
|
привет
|
|
|
|
@@ helpers.html.tt
|
|
[% h.url_for('helpers') %]
|
|
|
|
@@ unknown_helper.html.tt
|
|
[% h.unknown_helper('foo') %]
|