remove / prefix

- Mojolicious 5.0 support

.travis.yml

@@ -4,7 +4,8 @@ install:
   - cpanm -n Template
 script: HARNESS_IS_VERBOSE=1 prove -v -Ilib t
 perl:
-  - "5.19"
+  - "5.21"
+  - "5.20"
   - "5.18"
   - "5.16"
   - "5.14"

Changes

@@ -2,6 +2,9 @@ Revision history for Mojolicious::Plugin::TtRenderer
 
 {{$NEXT}}
 
+1.53      2014-05-31 06:22:47 -0400
+        - Mojolicious 5.0 support
+
 1.52      2014-05-08 19:26:47 -0400
         - updated repository name
 

dist.ini

@@ -5,30 +5,17 @@ license = Perl_5
 copyright_holder = Ask Bjørn Hansen
 # copyright_year   = 2009
 
-version = 1.52
+version = 1.53
 
 [@Author::Plicease]
 release_tests = 1
 travis_status = 1
+installer     = ModuleBuild
 
 [Prereqs]
 Mojolicious  = 3.33
 Template     = 2.18
 
-[Prereqs / TestRequires ]
-Test::More   = 0
-
-[MetaResources]
-bugtracker.web = https://github.com/plicease/Mojolicious-Plugin-TtRenderer/issues
-repository.web  = https://github.com/plicease/Mojolicious-Plugin-TtRenderer
-repository.url  = git://github.com/plicease/Mojolicious-Plugin-TtRenderer.git
-repository.type = git
-
-[CheckChangeLog]
-[Test::Compile]
-[HasVersionTests]
-[MetaTests]
-
 [Author::Plicease::Thanks]
 current     = Graham Ollis <plicease@cpan.org>
 original    = Ask Bjørn Hansen
@@ -59,13 +46,22 @@ directory = example
 ; comes with Perl
 remove = warnings
 remove = strict
+remove = lib
+remove = utf8
 remove = base
 remove = Carp
 remove = Cwd
 remove = File::Spec
 remove = Scalar::Util
+remove = File::Temp
+remove = FindBin
+remove = IO::Handle
 
 ; comes with Mojolicious
 remove = Mojo::Base
 remove = Mojo::ByteStream
 remove = Mojolicious::Plugin
+remove = Mojo::IOLoop
+remove = Mojolicious::Lite
+remove = Test::Mojo
+

lib/Mojolicious/Plugin/TtRenderer/Engine.pm

@@ -102,6 +102,7 @@ sub _render {
             $self->tt->process(\$inline, @params);
         }
         else {
+            $t =~ s{^/}{};
             my @ret = $provider->fetch($t);
 
             if (not defined $ret[1]) {

t/00_diag.txt

@@ -1,16 +1,7 @@
 EV
-ExtUtils::MakeMaker
+Module::Build
-File::Temp
-FindBin
-IO::Handle
-IPC::Open3
-Mojo::IOLoop
 Mojolicious
-Mojolicious::Lite
 POSIX
 Template
 Template::Provider
-Test::Mojo
 Test::More
-lib
-utf8

t/deep_recursion.t

@@ -1,69 +0,0 @@
-#!/usr/bin/env perl
-
-use strict;
-use warnings;
-
-#BEGIN { $ENV{MOJO_MODE}='testing'; };
-
-use utf8;
-
-use Test::More;
-
-use Mojolicious::Lite;
-use Test::Mojo;
-use File::Temp qw( tempdir );
-use File::Spec;
-
-if($Mojolicious::VERSION >= 4.0)
-{
-  plan skip_all => 'test broken in mojo 4.0';
-}
-else
-{
-  plan tests => 3;
-}
-
-# Send log to tmp file so that it doesn't clutter up the screen.
-app->log->level('fatal');
-app->log->path(do {
-  File::Spec->catfile(tempdir(CLEANUP => 1), 'mojo.log');
-});
-
-plugin 'tt_renderer' => {template_options => { COMPILE_DIR => tempdir( CLEANUP => 1 ) }};
-
-get '/exception' => sub { die };
-
-#say app->mode;
-#app->start;
-#exit;
-
-my $t = Test::Mojo->new;
-
-$t->app->renderer->default_handler('tt');
-
-my $deep_recursion = 0;
-
-do {
-  local $SIG{__WARN__} = sub {
-    my $warning = shift;
-    if($warning =~ /Deep recursion/) {
-      $deep_recursion = 1;
-      die $warning;
-    }
-  };
-  $t->get_ok('/exception')
-    ->status_is(500);
-};
-
-ok !$deep_recursion, 'no deep recursion';
-
-__DATA__
-
-@@ exception.development.html.tt
-[% 1 + % %]
-
-@@ exception.html.tt
-[% 1 + % %]
-
-@@ exception.testing.html.tt
-[% 1 + % %]

t/pod.t

@@ -1,12 +0,0 @@
-#!perl -T
-
-use strict;
-use warnings;
-use Test::More;
-
-# Ensure a recent version of Test::Pod
-my $min_tp = 1.22;
-eval "use Test::Pod $min_tp";
-plan skip_all => "Test::Pod $min_tp required for testing POD" if $@;
-
-all_pod_files_ok();

t/tt_plugin_lite_app.t

@@ -24,7 +24,7 @@ BEGIN { $ENV{MOJO_TMPDIR} ||= tempdir( CLEANUP => 1) }
 
 # Make sure sockets are working
 plan skip_all => 'working sockets required for this test!'
-  unless Mojo::IOLoop->new->generate_port;
+  unless Mojo::IOLoop::Server->new->generate_port;
 plan tests => 6;
 
 # Leela: OK, this has gotta stop. I'm going to remind Fry of his humanity the way only a woman can.

xt/release/unused_vars.t

@@ -8,7 +8,7 @@ BEGIN { plan skip_all => 'test requires YAML' unless eval q{ use YAML; 1 } }
 my $dir = Path::Class::Dir->new(__FILE__)->parent->parent->parent;
 my $config = YAML::LoadFile($dir->file(qw( xt release release.yml )));
 
-plan skip_all => 'disabled' if $config->{unused_vars}->{skip};
+plan skip_all => 'disabled' unless defined $config->{unused_vars}->{skip} && !$config->{unused_vars}->{skip};
 
 my @modules;
 recurse($dir->subdir('lib'));