remove / prefix

- Mojolicious 5.0 support

.gitignore

@@ -1,14 +1,3 @@
-blib*
-Makefile
-Makefile.old
-Build
-_build*
-pm_to_blib*
-*.tar.gz
-.lwpcookies
-Mojolicious-Plugin-TtRenderer-*
-MojoX-Renderer-TT-*
-cover_db
-*~
-*.bak
-.build
+/Mojolicious-Plugin-TtRenderer-*
+/.build
+/example/myapp/log/development.log

.travis.yml

@@ -1,8 +1,13 @@
 language: perl
 install:
-  - cpanm Mojolicious Template
+  - cpanm -n Mojolicious
+  - cpanm -n Template
 script: HARNESS_IS_VERBOSE=1 prove -v -Ilib t
 perl:
+  - "5.21"
+  - "5.20"
+  - "5.18"
+  - "5.16"
   - "5.14"
   - "5.12"
   - "5.10"

Changes

@@ -1,23 +1,126 @@
 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
+
+1.51      2014-03-21 14:59:39 -0400
+        - extended diagnostics
+        - documentation tweaks
+        - fix non-lite app example (GH#41, uwisser)
+
+1.50      2013-08-08T16:51:21-0400
+        - update Changes to follow spec (GH#39, Сергей Романов)
+        - minor documentation fixes
+
+1.49    2013-08-08T09:18:54-0400
+        - documentation
+
+1.48    2013-08-08T09:13:19-0400
+        - documentation
+
+1.47    2013-07-26T06:07:35-0400
+        - Template-Toolkit 2.25 compatability
+
+1.46    2013-05-19
+        - Mojolicious 4.0 compatability
+
+1.45    2013-04-26
+        - correctly support app->default->{layout} (GH#37, Fayland Lam)
+
+1.44    2013-04-13
+        - promote development changes to production
+
+1.43_01 2013-04-11
+        - _template_modified returns value from super class instead of 1 if true (GH#36, Fayland Lam)
+
+1.43    2013-04-08
+        - promote development changes
+
+1.42_04 2013-04-06
+        - Updated meta for new github repo location
+
+1.42_03 2013-03-22
+        - Allow custom relative paths for cache_dir (GH#35, Jason Crowther)
+
+1.42_02 2013-02-26
+        - only create COMPILE_DIR based on UID if the user doesn't specify COMPILE_DIR
+
+1.42_01 2013-02-24
+        - set COMPILE_DIR based on UID so that multiple users can use TtRenderer with default config
+
+1.42    2013-02-24
+        - fix for test on solaris
+
+1.41    2013-02-23
+        - Additional testing diagnostics
+
+1.40    2013-02-20
+        - Added diagnostic for IO loop implementation in testing
+
+1.39    2013-01-28
+        - Documentation updates.
+
+1.38    2013-01-27
+        - fixed but where DATA templates were not being rendered with empty renderer path
+
+1.37    2013-01-12
+        - fix default_template2.t to use temp directory for COMPILE_DIR
+
+1.36    2013-01-09
+        - Use $provider->fetch to find templates (GH#34)
+
+1.35    2012-12-30
+        - Documentation fix
+
+1.34    2012-12-29
+        - Include META.json in distribution.
+
+1.33    2012-12-27
+        - Fix hang in t/deep_recursion.t on *BSD
+
+1.32    2012-12-27
+        - silenced a few annoying warnings during test
+        - use temp directory for COMPILE_DIR in tests to avoid failures if the
+          default compile directory already exists and is owned by someone else.
+
+1.31    2012-12-26
+        - Set locale "C" in tests that rely on it
+
+1.30    2012-12-22
+        - Don't rely on English locale in the test t/tt_plugin_lite_app.t
+
+1.29    2012-12-18
+        - support multiple renderer paths
+
+1.28    2012-10-11
+        - specify minimum perl version
+
+1.27    2012-10-02
+        - documentation fixes and updates.
+
+1.26    2012-08-31
         - Windows compatability with Cwd::abs_path
 
-1.25    August 25, 2012
+1.25    2012-08-25
         - Return 0 on not found, die on error (GH#30)
 
-1.24    August 23, 2012
+1.24    2012-08-23
         - Compatibility with Mojolicious 3.33+
 
-1.23    August 23, 2012
+1.23    2012-08-23
         - Use die instead of render_exception (GH#29)
 
-1.22    August 21, 2012
+1.22    2012-08-21
         - Compatibility with Mojolicious 3.05+ (GH#24)
         - Avoid deep recursion when exception template dies (GH#25,GH26)
         - Fixed test failures (GH#27,GH#28)
 
-1.21    June 5, 2012
+1.21    2012-06-05
         - Fixed double TT rendering on error (Matthias Bethke (GH#21))
         - Cache templates in tmpdir by default (Marcus Ramberg)
         - Require Mojolicious 2.51 to avoid memory leaks (GH#19)
@@ -25,28 +128,28 @@ Revision history for Mojolicious::Plugin::TtRenderer
         - Fix memory leaks, add tests for them (GH#18, Magnus Holm)
         - Use app->renderer->paths to find template directories (GH#17)
 
-1.20    August 1, 2011
+1.20    2011-08-01
         - Drop use of MojoX namespace for Mojolicious::Plugin::TtRenderer::
           (GH#12, Cosimo Streppone)
 
-1.13    June 7, 2011
+1.13    2011-06-07
         - Compatibility with Mojolicious 1.3+
 
-1.12    February 28, 2011
+1.12    2011-02-28
         - Inline wrappers and includes now work on Windows
           (GH#13, Christiaan Kras)
 
-1.11    February 6, 2011
+1.11    2011-02-06
         - Change to use relative paths (Marcus Ramberg)
         - Add exception template for tests
 
-1.10    February 5, 2011
+1.10    2011-02-05
         - Support Mojolicious 'layout'/'extends' (Maxim Vuets, Marcus
           Ramberg)
         - Fix Strawberry Perl tests (RT#65282, Christiaan Kras, Ask)
         - Update bugtracker URL in META.yml
 
-1.0     January 22, 2011
+1.0     2011-01-22
         - Require (and be compatible with) Mojolicious 1.0+
         - Added inline template support (Viacheslav Tykhanovskyi & Ask)
         - Fix inline rendering and test failures (Marcus Ramberg)
@@ -55,31 +158,31 @@ Revision history for Mojolicious::Plugin::TtRenderer
         - Fix unicode test (Marcus & Spleenjack)
         - Replaced deprecated Mojo dependence with Mojolicious (spleenjack)
 
-0.40    August 2, 2010
+0.40    2010-08-02
         - Updated for newer Mojo (Viacheslav Tykhanovskyi)
         - Added helpers (Viacheslav Tykhanovskyi)
         - Documentation updates
 
-0.31    September 11, 2009
+0.31    2009-09-11
         - Remove deprecated 'new' method
         - Update MANIFEST (oops, thanks Sebastian)
 
-0.30    September 9, 2009
+0.30    2009-09-09
         - Revert the change of template_path stash key
         - Reflect recent changes in mojo project (v0.991251) (Sebastian Knapp)
         - One test with Mojolicious added (Sebastian Knapp)
 
-0.21    July 29, 2009
+0.21    2009-07-29
         - Update stash key from 'template_path' to 'template' to
           match mojo change (Sebastian Knapp)
 
-0.20    December 9, 2008
+0.20    2008-12-09
         - Updates to work with Mojo 0.9
         - Add default INCLUDE_PATH
         - Made default compile dir not Unix specific (Viacheslav
           Tykhanovskyi)
 
-0.10    November 12, 2008
+0.10    2008-11-12
         - Update to work with named parameters in new version of Mojo
         - Instead of "tx" pass the context in the "c" variable
         - Rename "new" to "build"
@@ -87,10 +190,9 @@ Revision history for Mojolicious::Plugin::TtRenderer
         - Update to work with new error handling in Mojo
           (Viacheslav Tykhanovskyi)
 
-0.02    November 10, 2008
+0.02    2008-11-10
         - Add template_options parameter
         - Fix Template dependency
 
-0.01    November 9, 2008
+0.01    2008-11-09
         - First version, released on an unsuspecting world.
-

MANIFEST.SKIP

@@ -1,44 +0,0 @@
-# Avoid version control files.
-\bRCS\b
-\bCVS\b
-\bSCCS\b
-,v$
-\B\.svn\b
-\B\.git\b
-\b_darcs\b
-
-# Avoid Makemaker generated and utility files.
-\bMANIFEST\.bak
-\bMYMETA.*
-\bMakefile$
-\bblib/
-\bMakeMaker-\d
-\bpm_to_blib\.ts$
-\bpm_to_blib$
-\bblibdirs\.ts$         # 6.18 through 6.25 generated this
-
-# Avoid Module::Build generated and utility files.
-\bBuild$
-\b_build/
-
-# Avoid temp and backup files.
-~$
-\.old$
-\#$
-\b\.#
-\.bak$
-
-# Avoid Devel::Cover files.
-\bcover_db\b
-
-### DEFAULT MANIFEST.SKIP ENDS HERE ####
-
-t/tmp/ctpl
-
-\.DS_Store$
-\.sw.$
-(\w+-)*(\w+)-\d\.\d+(?:\.tar\.gz)?$
-
-\.t\.log$
-
-\.prove$

README.md

@@ -0,0 +1,231 @@
+# Mojolicious::Plugin::TtRenderer [![Build Status](https://secure.travis-ci.org/plicease/Mojolicious-Plugin-TtRenderer.png)](http://travis-ci.org/plicease/Mojolicious-Plugin-TtRenderer)
+
+Template Renderer Plugin for Mojolicious
+
+# SYNOPSIS
+
+[Mojolicious::Lite](https://metacpan.org/pod/Mojolicious::Lite):
+
+    plugin 'tt_renderer';
+
+[Mojolicious](https://metacpan.org/pod/Mojolicious)
+
+    $self->plugin('tt_renderer');
+
+# DESCRIPTION
+
+This plugin is a simple Template Toolkit renderer for [Mojolicious](https://metacpan.org/pod/Mojolicious). 
+Its defaults are usually reasonable, although for finer grain detail in 
+configuration you may want to use 
+[Mojolicious::Plugin::TtRenderer::Engine](https://metacpan.org/pod/Mojolicious::Plugin::TtRenderer::Engine) directly.
+
+# OPTIONS
+
+These are the options that can be passed in as arguments to this plugin.
+
+## template\_options
+
+Configuration hash passed into [Template](https://metacpan.org/pod/Template)'s constructor, see 
+[Template Toolkit's configuration summary](https://metacpan.org/pod/Template#CONFIGURATION-SUMMARY)
+for details.  Here is an example using the [Mojolicious::Lite](https://metacpan.org/pod/Mojolicious::Lite) form:
+
+    plugin 'tt_renderer' => {
+      template_options => {
+        PRE_CHOMP => 1,
+        POST_CHOMP => 1,
+        TRIM => 1,
+      },
+    };
+
+Here is the same example using the full [Mojolicious](https://metacpan.org/pod/Mojolicious) app form:
+
+    package MyApp;
+    
+    use Mojo::Base qw( Mojolicious );
+    
+    sub startup {
+      my($self) = @_;
+      
+      $self->plugin('tt_renderer' => {
+        template_options => {
+          PRE_CHOMP => 1,
+          POST_CHOMP => 1,
+          TRIM => 1,
+        },
+      }
+      
+      ...
+    }
+
+These options will be used if you do not override them:
+
+- INCLUDE\_PATH
+
+    Generated based on your application's renderer's configuration.  It
+    will include all renderer paths, in addition to search files located
+    in the `__DATA__` section by the usual logic used by [Mojolicious](https://metacpan.org/pod/Mojolicious).
+
+- COMPILE\_EXT
+
+    `.ttc`
+
+- UNICODE
+
+    `1` (true)
+
+- ENCODING
+
+    `utf-87`
+
+- CACHE\_SIZE
+
+    `128`
+
+- RELATIVE
+
+    `1` (true)
+
+## cache\_dir
+
+Specifies the directory in which compiled template files are
+written.  This:
+
+    plugin 'tt_renderer', { cache_dir => 'some/path' };
+
+is equivalent to
+
+    plugin 'tt_renderer', { template_options { COMPILE_DIR => 'some/path' } };
+
+except in the first example relative paths are relative to the [Mojolicious](https://metacpan.org/pod/Mojolicious)
+app's home directory (`$app->home`).
+
+# STASH
+
+## h
+
+Helpers are available via the `h` entry in the stash.
+
+    <a href="[% h.url_for('index') %]">go back to index</a>
+
+## c
+
+The current controller instance can be accessed as `c`.
+
+    I see you are requesting a document from [% c.req.headers.host %].
+
+# EXAMPLES
+
+[Mojolicious::Lite](https://metacpan.org/pod/Mojolicious::Lite) example:
+
+    use Mojolicious::Lite;
+    
+    plugin 'tt_renderer';
+    
+    get '/' => sub {
+      my $self = shift;
+      $self->render('index');
+    };
+    
+    app->start;
+    
+    __DATA__
+    
+    @@ index.html.tt
+    [% 
+       WRAPPER 'layouts/default.html.tt' 
+       title = 'Welcome'
+    %]
+    <p>Welcome to the Mojolicious real-time web framework!</p>
+    <p>Welcome to the TtRenderer plugin!</p>
+    [% END %]
+    
+    @@ layouts/default.html.tt
+    <!DOCTYPE html>
+    <html>
+      <head><title>[% title %]</title></head>
+      <body>[% content %]</body>
+    </html>
+
+[Mojolicious](https://metacpan.org/pod/Mojolicious) example:
+
+    package MyApp;
+    use Mojo::Base 'Mojolicious';
+    
+    sub startup {
+      my $self = shift;
+      $self->plugin('tt_renderer');
+      my $r = $self->routes;
+      $r->get('/')->to('example#welcome');
+    }
+    
+    1;
+
+    package MyApp::Example;
+    use Mojo::Base 'Mojolicious::Controller';
+    
+    # This action will render a template
+    sub welcome {
+      my $self = shift;
+    
+      # Render template "example/welcome.html.tt" with message
+      $self->render(
+        message => 'Looks like your TtRenderer is working!');
+    }
+    
+    1;
+
+These are also included with the `Mojolicious::Plugin::TtRenderer`
+distribution, including the support files required for the full 
+[Mojolicious](https://metacpan.org/pod/Mojolicious) app example.
+
+# SEE ALSO
+
+[Mojolicious::Plugin::TtRenderer::Engine](https://metacpan.org/pod/Mojolicious::Plugin::TtRenderer::Engine), 
+[Mojolicious](https://metacpan.org/pod/Mojolicious), 
+[Mojolicious::Guides](https://metacpan.org/pod/Mojolicious::Guides), 
+[http://mojolicious.org](http://mojolicious.org).
+
+# AUTHOR
+
+original author: Ask Bjørn Hansen
+
+current maintainer: Graham Ollis <plicease@cpan.org>
+
+contributors:
+
+vti
+
+Marcus Ramberg
+
+Matthias Bethke
+
+Htbaa
+
+Magnus Holm
+
+Maxim Vuets
+
+Rafael Kitover
+
+giftnuss
+
+Cosimo Streppone
+
+Fayland Lam
+
+Jason Crowther
+
+spleenjack
+
+Árpád Szász
+
+Сергей Романов
+
+uwisser
+
+# COPYRIGHT AND LICENSE
+
+This software is copyright (c) 2014 by Ask Bjørn Hansen.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.

dist.ini

@@ -5,42 +5,63 @@ license = Perl_5
 copyright_holder = Ask Bjørn Hansen
 # copyright_year   = 2009
 
+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
+[Author::Plicease::Thanks]
+current     = Graham Ollis <plicease@cpan.org>
+original    = Ask Bjørn Hansen
+contributor = vti
+contributor = Marcus Ramberg
+contributor = Matthias Bethke
+contributor = Htbaa
+contributor = Magnus Holm
+contributor = Maxim Vuets
+contributor = Rafael Kitover
+contributor = giftnuss
+contributor = Cosimo Streppone
+contributor = Fayland Lam
+contributor = Jason Crowther
+contributor = spleenjack
+contributor = Árpád Szász
+contributor = Сергей Романов
+contributor = uwisser
 
-[@Git]
-tag_format = release/%v
-# push_to    = all
+[Author::Plicease::Upload]
 
-[@Filter]
-bundle = @Basic
-remove = Readme
-remove = Manifest
+[InsertExample]
 
-[MetaResources]
-bugtracker.web = https://github.com/abh/mojox-renderer-tt/issues
-repository.web  = http://github.com/abh/mojox-renderer-tt
-repository.url  = git://github.com/abh/mojox-renderer-tt.git
-repository.type = git
+[MetaNoIndex]
+directory = example
 
-[Homepage]
+[RemovePrereqs]
+; 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
 
-[BumpVersionFromGit]
-version_regexp = ^release/(.*)
-
-[PkgVersion]
-
-[CheckChangeLog]
-[Test::Compile]
-[HasVersionTests]
-[MetaTests]
-[ReadmeFromPod]
-[Manifest]
-
-[NextRelease]
-format = %-7v %{MMMM d, yyyy}d
+; comes with Mojolicious
+remove = Mojo::Base
+remove = Mojo::ByteStream
+remove = Mojolicious::Plugin
+remove = Mojo::IOLoop
+remove = Mojolicious::Lite
+remove = Test::Mojo
 

example/README

@@ -0,0 +1,8 @@
+Included in this directory are two examples of how to use the Template Toolkit
+Renderer.
+
+myapp.pl - Mojolicious::Lite example
+myapp/   - full Mojolicious application example
+
+They were created as minor modifications of the applications generated
+using the 'mojo generate' command.

example/myapp.pl

@@ -0,0 +1,28 @@
+use Mojolicious::Lite;
+
+plugin 'tt_renderer';
+
+get '/' => sub {
+  my $self = shift;
+  $self->render('index');
+};
+
+app->start;
+
+__DATA__
+
+@@ index.html.tt
+[% 
+   WRAPPER 'layouts/default.html.tt' 
+   title = 'Welcome'
+%]
+<p>Welcome to the Mojolicious real-time web framework!</p>
+<p>Welcome to the TtRenderer plugin!</p>
+[% END %]
+
+@@ layouts/default.html.tt
+<!DOCTYPE html>
+<html>
+  <head><title>[% title %]</title></head>
+  <body>[% content %]</body>
+</html>

example/myapp/lib/MyApp.pm

@@ -0,0 +1,11 @@
+package MyApp;
+use Mojo::Base 'Mojolicious';
+
+sub startup {
+  my $self = shift;
+  $self->plugin('tt_renderer');
+  my $r = $self->routes;
+  $r->get('/')->to('example#welcome');
+}
+
+1;

example/myapp/lib/MyApp/Example.pm

@@ -0,0 +1,13 @@
+package MyApp::Example;
+use Mojo::Base 'Mojolicious::Controller';
+
+# This action will render a template
+sub welcome {
+  my $self = shift;
+
+  # Render template "example/welcome.html.tt" with message
+  $self->render(
+    message => 'Looks like your TtRenderer is working!');
+}
+
+1;

example/myapp/public/index.html

@@ -0,0 +1,11 @@
+<!DOCTYPE html>
+<html>
+  <head>
+    <title>Welcome to the Mojolicious real-time web framework!</title>
+  </head>
+  <body>
+    <h2>Welcome to the Mojolicious real-time web framework!</h2>
+    This is the static document "public/index.html",
+    <a href="/">click here</a> to get back to the start.
+  </body>
+</html>

example/myapp/script/my_app

@@ -0,0 +1,11 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+use FindBin;
+BEGIN { unshift @INC, "$FindBin::Bin/../lib" }
+
+# Start command line interface for application
+require Mojolicious::Commands;
+Mojolicious::Commands->start_app('MyApp');

example/myapp/t/basic.t

@@ -0,0 +1,9 @@
+use Mojo::Base -strict;
+
+use Test::More;
+use Test::Mojo;
+
+my $t = Test::Mojo->new('MyApp');
+$t->get_ok('/')->status_is(200)->content_like(qr/Mojolicious/i);
+
+done_testing();

example/myapp/templates/example/welcome.html.tt

@@ -0,0 +1,10 @@
+[%
+  WRAPPER 'layouts/default.html.tt'
+  title = 'Welcome'
+%]
+<h2>[% message %]</h2>
+This page was generated from the template "templates/example/welcome.html.tt"
+and the layout "templates/layouts/default.html.tt",
+<a href="[% url_for %]">click here</a> to reload the page or
+<a href="/index.html">here</a> to move forward to a static page.
+[% END %]

example/myapp/templates/layouts/default.html.tt

@@ -0,0 +1,5 @@
+<!DOCTYPE html>
+<html>
+  <head><title>[% title %]</title></head>
+  <body>[% content %]</body>
+</html>

lib/Mojolicious/Plugin/TtRenderer.pm

@@ -2,6 +2,10 @@ package Mojolicious::Plugin::TtRenderer;
 
 use strict;
 use warnings;
+use v5.10;
+
+# ABSTRACT: Template Renderer Plugin for Mojolicious
+# VERSION
 
 use base 'Mojolicious::Plugin';
 
@@ -18,48 +22,157 @@ sub register {
     $app->renderer->add_handler(tt => $tt);
 }
 
-local ($Mojolicious::Plugin::TtRenderer::VERSION) = ('devel') unless defined $Mojolicious::Plugin::TtRenderer::VERSION;
+$Mojolicious::Plugin::TtRenderer::VERSION //= ('devel');
 
 1;
 __END__
 
-=head1 NAME
+=encoding utf-8
 
-Mojolicious::Plugin::TtRenderer - Template Renderer Plugin
+=begin stopwords
+
+Bjørn
+Szász
+Árpád
+
+=end stopwords
 
 =head1 SYNOPSIS
 
-    # Mojolicious
-    $self->plugin('tt_renderer');
-    $self->plugin(tt_renderer => {template_options => {FILTERS => [ ... ]}});
+L<Mojolicious::Lite>:
 
-    # Mojolicious::Lite
-    plugin 'tt_renderer';
-    plugin tt_renderer => {template_options => {FILTERS => [ ... ]}};
+ plugin 'tt_renderer';
+
+L<Mojolicious>
+
+ $self->plugin('tt_renderer');
 
 =head1 DESCRIPTION
 
-L<Mojolicous::Plugin::TtRenderer> is a simple loader for L<MojoX::Renderer::TT>.
+This plugin is a simple Template Toolkit renderer for L<Mojolicious>. 
+Its defaults are usually reasonable, although for finer grain detail in 
+configuration you may want to use 
+L<Mojolicious::Plugin::TtRenderer::Engine> directly.
 
-=head1 METHODS
+=head1 OPTIONS
 
-L<Mojolicious::Plugin::TtRenderer> inherits all methods from
-L<Mojolicious::Plugin> and implements the following new ones.
+These are the options that can be passed in as arguments to this plugin.
 
-=head2 C<register>
+=head2 template_options
 
-    $plugin->register;
+Configuration hash passed into L<Template>'s constructor, see 
+L<Template Toolkit's configuration summary|Template#CONFIGURATION-SUMMARY>
+for details.  Here is an example using the L<Mojolicious::Lite> form:
 
-Register renderer in L<Mojolicious> application.
+ plugin 'tt_renderer' => {
+   template_options => {
+     PRE_CHOMP => 1,
+     POST_CHOMP => 1,
+     TRIM => 1,
+   },
+ };
 
-=head1 EXTRA STASH VARIABLES
+Here is the same example using the full L<Mojolicious> app form:
+
+ package MyApp;
+ 
+ use Mojo::Base qw( Mojolicious );
+ 
+ sub startup {
+   my($self) = @_;
+   
+   $self->plugin('tt_renderer' => {
+     template_options => {
+       PRE_CHOMP => 1,
+       POST_CHOMP => 1,
+       TRIM => 1,
+     },
+   }
+   
+   ...
+ }
+
+These options will be used if you do not override them:
+
+=over 4
+
+=item INCLUDE_PATH
+
+Generated based on your application's renderer's configuration.  It
+will include all renderer paths, in addition to search files located
+in the C<__DATA__> section by the usual logic used by L<Mojolicious>.
+
+=item COMPILE_EXT
+
+C<.ttc>
+
+=item UNICODE
+
+C<1> (true)
+
+=item ENCODING
+
+C<utf-87>
+
+=item CACHE_SIZE
+
+C<128>
+
+=item RELATIVE
+
+C<1> (true)
+
+=back
+
+=head2 cache_dir
+
+Specifies the directory in which compiled template files are
+written.  This:
+
+ plugin 'tt_renderer', { cache_dir => 'some/path' };
+
+is equivalent to
+
+ plugin 'tt_renderer', { template_options { COMPILE_DIR => 'some/path' } };
+
+except in the first example relative paths are relative to the L<Mojolicious>
+app's home directory (C<$app-E<gt>home>).
+
+=head1 STASH
+
+=head2 h
+
+Helpers are available via the C<h> entry in the stash.
+
+ <a href="[% h.url_for('index') %]">go back to index</a>
+
+=head2 c
 
 The current controller instance can be accessed as C<c>.
 
-   [% c.req.headers.host %]
+ I see you are requesting a document from [% c.req.headers.host %].
+
+=head1 EXAMPLES
+
+L<Mojolicious::Lite> example:
+
+# EXAMPLE: example/myapp.pl
+
+L<Mojolicious> example:
+
+# EXAMPLE: example/myapp/lib/MyApp.pm
+
+# EXAMPLE: example/myapp/lib/MyApp/Example.pm
+
+These are also included with the C<Mojolicious::Plugin::TtRenderer>
+distribution, including the support files required for the full 
+L<Mojolicious> app example.
 
 =head1 SEE ALSO
 
-L<Mojolicious::Plugin::TtRenderer::Engine>, L<Mojolicious>, L<Mojolicious::Guides>, L<http://mojolicious.org>.
+L<Mojolicious::Plugin::TtRenderer::Engine>, 
+L<Mojolicious>, 
+L<Mojolicious::Guides>, 
+L<http://mojolicious.org>.
 
 =cut

lib/Mojolicious/Plugin/TtRenderer/Engine.pm

@@ -3,15 +3,17 @@ package Mojolicious::Plugin::TtRenderer::Engine;
 use warnings;
 use strict;
 use v5.10;
-
 use base 'Mojo::Base';
-
 use Carp ();
 use File::Spec ();
 use Mojo::ByteStream 'b';
 use Template ();
 use Cwd qw/abs_path/;
 use Scalar::Util 'weaken';
+use POSIX ':errno_h';
+
+# ABSTRACT: Template Toolkit renderer for Mojolicious
+# VERSION
 
 __PACKAGE__->attr('tt');
 
@@ -33,7 +35,7 @@ sub _init {
     if($dir=$args{cache_dir}) {
 
       if($app && substr($dir,0,1) ne '/') {
-        $dir=$app->home->rel_dir('tmp/ctpl');
+        $dir=$app->home->rel_dir($dir);
       }
     }
 
@@ -41,21 +43,24 @@ sub _init {
     #   take and process options :-)
 
     my @renderer_paths = $app ? map { abs_path($_) } grep { -d $_ } @{ $app->renderer->paths } : ();
+    push @renderer_paths, 'templates';
 
     my %config = (
-        (   @renderer_paths > 0
-            ? (INCLUDE_PATH => join(":", @renderer_paths))
-            : ()
-        ),
-        COMPILE_EXT => '.ttc',
-        COMPILE_DIR => ($dir || abs_path(File::Spec->tmpdir)),
-        UNICODE     => 1,
-        ENCODING    => 'utf-8',
-        CACHE_SIZE  => 128,
-        RELATIVE    => 1,
+        INCLUDE_PATH => \@renderer_paths,
+        COMPILE_EXT  => '.ttc',
+        UNICODE      => 1,
+        ENCODING     => 'utf-8',
+        CACHE_SIZE   => 128,
+        RELATIVE     => 1,
         %{$args{template_options} || {}},
     );
 
+    $config{COMPILE_DIR} //= $dir || do {
+      my $tmpdir = File::Spec->catdir(File::Spec->tmpdir, "ttr$<");
+      mkdir $tmpdir unless -d $tmpdir;
+      $tmpdir;
+    };
+
     $config{LOAD_TEMPLATES} =
       [Mojolicious::Plugin::TtRenderer::Provider->new(%config, renderer => $app->renderer)]
       unless $config{LOAD_TEMPLATES};
@@ -77,21 +82,41 @@ sub _render {
     $t = 'inline' if defined $inline;
     return unless $t;
 
-
     my $helper = Mojolicious::Plugin::TtRenderer::Helper->new(ctx => $c);
 
     # Purge previous result
     $$output = '';
 
+    # fixes for t/lite_app_with_default_layouts.t
+    unless ($c->stash->{layout}) {
+        $c->stash->{content} ||= $c->stash->{'mojo.content'}->{content};
+    }
+
     my @params = ({%{$c->stash}, c => $c, h => $helper}, $output, {binmode => ':utf8'});
     my $provider = $self->tt->{SERVICE}->{CONTEXT}->{LOAD_TEMPLATES}->[0];
     $provider->options($options);
     $provider->ctx($c);
-    $provider->not_found(0);
 
-    my $ok = $self->tt->process(defined $inline ? \$inline : $t, @params);
+    my $ok = do {
+        if (defined $inline) {
+            $self->tt->process(\$inline, @params);
+        }
+        else {
+            $t =~ s{^/}{};
+            my @ret = $provider->fetch($t);
 
-    return 0 if $provider->not_found;
+            if (not defined $ret[1]) {
+                $self->tt->process($ret[0], @params);
+            }
+            elsif (not defined $ret[0]) { # not found
+                return 0;
+            }
+            else { # error
+                return 0 if $! == ENOENT && (not ref $ret[0]); # not found when not blessed exception
+                die $ret[0];
+            }
+        }
+    };
 
     # Error
     die $self->tt->error unless $ok;
@@ -155,9 +180,11 @@ sub new {
 sub renderer      { @_ > 1 ? $_[0]->{renderer}      = $_[1] : $_[0]->{renderer} }
 sub ctx           { @_ > 1 ? $_[0]->{ctx}           = $_[1] : $_[0]->{ctx} }
 sub options       { @_ > 1 ? $_[0]->{options}       = $_[1] : $_[0]->{options} }
-sub not_found     { @_ > 1 ? $_[0]->{not_found}     = $_[1] : $_[0]->{not_found} }
 
-sub _template_modified {1}
+sub _template_modified {
+    my($self, $template) = @_;
+    $self->SUPER::_template_modified($template) || $template =~ /^templates(?:\/|\\)/;
+}
 
 sub _template_content {
     my $self = shift;
@@ -179,7 +206,6 @@ sub _template_content {
     # Try DATA section
     if(defined $options) {
         $data = $self->renderer->get_data_template($options);
-        $self->not_found(1) unless defined $data;
     } else {
         my $loader = Mojo::Loader->new;
         foreach my $class (@{ $self->renderer->classes }) {
@@ -201,37 +227,51 @@ __END__
 
 =encoding utf-8
 
-=head1 NAME
+=begin stopwords
 
-Mojolicious::Plugin::TtRenderer::Engine - Template Toolkit renderer for Mojo
+Bjørn
+Szász
+Árpád
+
+=end stopwords
 
 =head1 SYNOPSIS
 
 Add the handler:
 
-    sub startup {
-        ...
+ sub startup {
+     ...
+ 
+     # Via mojolicious plugin
+     $self->plugin(tt_renderer => {template_options => {FILTERS => [ ... ]}});
+ 
+     # Or manually
+     use Mojolicious::Plugin::TtRenderer::Engine;
+ 
+     my $tt = Mojolicious::Plugin::TtRenderer::Engine->build(
+         mojo => $self,
+         template_options => {
+             PROCESS  => 'tpl/wrapper',
+             FILTERS  => [ ... ],
+             UNICODE  => 1,
+             ENCODING => 'UTF-8',
+         }
+     );
 
-        # Via mojolicious plugin
-        $self->plugin(tt_renderer => {template_options => {FILTERS => [ ... ]}});
+     $self->renderer->add_handler( tt => $tt );
+ }
 
-        # Or manually
-        use Mojolicious::Plugin::TtRenderer::Engine;
+Template parameter are taken from C<$c-E<gt>stash>.
 
-        my $tt = Mojolicious::Plugin::TtRenderer::Engine->build(
-            mojo => $self,
-            template_options => {
-                PROCESS  => 'tpl/wrapper',
-                FILTERS  => [ ... ],
-                UNICODE  => 1,
-                ENCODING => 'UTF-8',
-            }
-        );
+=head1 DESCRIPTION
 
-        $self->renderer->add_handler( tt => $tt );
-    }
+See L<Mojolicious::Plugin::TtRenderer> for details on the plugin interface to this module.
 
-Template parameter are taken from C< $c->stash >.
+This module provides an engine for the rendering of L<Template Toolkit|Template> templates
+within a Mojolicious context.  Templates may be, stored on the local file system, provided
+inline by the controller or included in the C<__DATA__> section.  Where possible this modules
+attempts to provide a TT analogue interface to the L<Perlish templates|Mojo::Template> which 
+come with Mojolicious.
 
 =head1 RENDERING
 
@@ -239,20 +279,20 @@ The template file for C<"example/welcome"> would be C<"templates/welcome.html.tt
 
 When template file is not available rendering from C<__DATA__> is attempted.
 
-    __DATA__
+ __DATA__
 
-    @@ welcome.html.tt
-    Welcome, [% user.name %]!
+ @@ welcome.html.tt
+ Welcome, [% user.name %]!
 
 Inline template is also supported:
 
-    $self->render(inline => '[% 1 + 1 %]', handler => 'tt');
+ $self->render(inline => '[% 1 + 1 %]', handler => 'tt');
 
 =head1 HELPERS
 
 Helpers are exported automatically under C<h> namespace.
 
-    [% h.url_for('index') %]
+ [% h.url_for('index') %]
 
 =head1 METHODS
 
@@ -270,7 +310,11 @@ object. When used the INCLUDE_PATH will be set to
 
 =item template_options
 
-A hash reference of options that are passed to Template->new().
+A hash reference of options that are passed to Template->new().  Note that if you
+specify an C<INCLUDE_PATH> through this option it will remove the DATA section
+templates from your path.  A better way to specify an C<INCLUDE_PATH> if you also
+want to use DATA section templates it by manipulating the L<Mojolicious::Renderer>
+path.
 
 =item cache_dir
 
@@ -279,63 +323,11 @@ templates. Will default to a temp-dir if not set.
 
 =back
 
-=head1 AUTHOR
+=head1 SEE ALSO
 
-Ask Bjørn Hansen, C<< <ask at develooper.com> >>
-
-=head1 TODO
-
-   * Better support non-Mojolicious frameworks
-   * Better way to pass parameters to the templates? (stash)
-   * More sophisticated default search path?
-
-=head1 BUGS
-
-Please report any bugs or feature requests to C<bug-mojox-renderer-tt at rt.cpan.org>,
-or through the web interface at
-L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=MojoX-Renderer-TT>.  I will be
-notified, and then you'll automatically be notified of progress on your bug as I
-make changes.
-
-=head1 SUPPORT
-
-You can find documentation for this module with the perldoc command.
-
-    perldoc Mojolicious::Plugin::TtRenderer::Engine
-
-You can also look for information at:
-
-=over 4
-
-=item * git repository
-
-L<http://git.develooper.com/?p=MojoX-Renderer-TT.git;a=summary>,
-L<git://git.develooper.com/MojoX-Renderer-TT.git>
-
-L<http://github.com/abh/mojox-renderer-tt/>
-
-=item * RT: CPAN's request tracker
-
-L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=MojoX-Renderer-TT>
-
-=item * CPAN Ratings
-
-L<http://cpanratings.perl.org/d/MojoX-Renderer-TT>
-
-=item * Search CPAN
-
-L<http://search.cpan.org/dist/MojoX-Renderer-TT/>
-
-=back
-
-=head1 ACKNOWLEDGEMENTS
-
-
-=head1 COPYRIGHT & LICENSE
-
-Copyright 2008-2010 Ask Bjørn Hansen, all rights reserved.
-
-This program is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
+L<Mojolicious::Plugin::TtRenderer>, 
+L<Mojolicious>, 
+L<Mojolicious::Guides>, 
+L<http://mojolicious.org>.
 
 =cut

t/00-load.t

@@ -1,9 +0,0 @@
-#!perl
-
-use Test::More tests => 1;
-
-BEGIN {
-	use_ok( 'Mojolicious::Plugin::TtRenderer::Engine' );
-}
-
-diag( "Testing Mojolicious::Plugin::TtRenderer::Engine $Mojolicious::Plugin::TtRenderer::Engine::VERSION, Perl $], $^X" );

t/00_diag.pl

@@ -0,0 +1,13 @@
+use strict;
+use warnings;
+use Test::More;
+use Mojo::IOLoop;
+
+our $format;
+
+my $loop = eval { Mojo::IOLoop->singleton };
+diag $@ if $@;
+diag sprintf $format, 'mojo io loop', ref eval { $loop->reactor };
+diag $@ if $@;
+
+1;

t/00_diag.pre.txt

@@ -0,0 +1 @@
+EV

t/00_diag.t

@@ -0,0 +1,89 @@
+use strict;
+use warnings;
+use Config;
+use Test::More tests => 1;
+BEGIN {
+  my @modules;
+  eval q{
+    require FindBin;
+    require File::Spec;
+    1;
+  } || die $@;
+  do {
+    my $fh;
+    open($fh, '<', File::Spec->catfile($FindBin::Bin, '00_diag.pre.txt'));
+    @modules = <$fh>;
+    close $fh;
+    chomp @modules;
+  };
+  eval qq{ require $_ } for @modules;
+};
+
+sub spacer ()
+{
+  diag '';
+  diag '';
+  diag '';
+}
+
+pass 'okay';
+
+my @modules;
+do {
+  my $fh;
+  open($fh, '<', File::Spec->catfile($FindBin::Bin, '00_diag.txt'));
+  @modules = <$fh>;
+  close $fh;
+  chomp @modules;
+};
+
+my $max = 1;
+$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
+our $format = "%-${max}s %s"; 
+
+spacer;
+
+my @keys = sort grep /(MOJO|PERL|\A(LC|HARNESS)_|\A(SHELL|LANG)\Z)/i, keys %ENV;
+
+if(@keys > 0)
+{
+  diag "$_=$ENV{$_}" for @keys;
+  
+  if($ENV{PERL5LIB})
+  {
+    spacer;
+    diag "PERL5LIB path";
+    diag $_ for split $Config{path_sep}, $ENV{PERL5LIB};
+    
+  }
+  elsif($ENV{PERLLIB})
+  {
+    spacer;
+    diag "PERLLIB path";
+    diag $_ for split $Config{path_sep}, $ENV{PERLLIB};
+  }
+  
+  spacer;
+}
+
+diag sprintf $format, 'perl ', $^V;
+
+require(File::Spec->catfile($FindBin::Bin, '00_diag.pl'))
+  if -e File::Spec->catfile($FindBin::Bin, '00_diag.pl');
+
+foreach my $module (@modules)
+{
+  if(eval qq{ require $module; 1 })
+  {
+    my $ver = eval qq{ \$$module\::VERSION };
+    $ver = 'undef' unless defined $ver;
+    diag sprintf $format, $module, $ver;
+  }
+  else
+  {
+    diag sprintf $format, $module, '-';
+  }
+}
+
+spacer;
+

t/00_diag.txt

@@ -0,0 +1,7 @@
+EV
+Module::Build
+Mojolicious
+POSIX
+Template
+Template::Provider
+Test::More

t/00_load.t

@@ -0,0 +1,7 @@
+use strict;
+use warnings;
+use Test::More tests => 2;
+
+use_ok( 'Mojolicious::Plugin::TtRenderer' );
+use_ok( 'Mojolicious::Plugin::TtRenderer::Engine' );
+

t/deep_recursion.t

@@ -1,55 +0,0 @@
-#!/usr/bin/env perl
-
-use strict;
-use warnings;
-
-#BEGIN { $ENV{MOJO_MODE}='testing'; };
-
-use utf8;
-
-use Test::More tests => 3;
-
-use Mojolicious::Lite;
-use Test::Mojo;
-
-# Silence
-app->log->level('fatal');
-
-plugin 'tt_renderer';
-
-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/default_handler_as_engine.t

@@ -0,0 +1,52 @@
+use strict;
+use warnings;
+use Test::More tests => 9;
+use Test::Mojo;
+use File::Temp qw( tempdir );
+use FindBin '$Bin';
+
+use Mojolicious::Lite;
+use Mojolicious::Plugin::TtRenderer::Engine ();
+
+my $tt = Mojolicious::Plugin::TtRenderer::Engine->build(
+    mojo => app,
+    template_options => {
+        UNICODE  => 1,
+        ENCODING => 'UTF-8',
+        #INCLUDE_PATH => "$Bin/templates",
+        COMPILE_DIR  => tempdir( CLEANUP => 1 ),
+    }
+);
+
+app->renderer->add_handler(tt => $tt);
+app->renderer->default_handler('tt');
+
+get '/' => sub {
+    die 'foo';
+};
+
+get '/bar' => 'bar';
+
+get '/grimlock' => 'grimlock';
+
+my $t = Test::Mojo->new;
+
+$t->get_ok('/')
+    ->status_is(500)
+    ->content_like(qr{foo});
+
+$t->get_ok('/bar')
+    ->status_is(200)
+    ->content_like(qr{bar});
+
+$t->get_ok('/grimlock')
+    ->status_is(200)
+    ->content_like(qr{King});
+
+__DATA__
+
+@@ index.html.tt
+anything
+
+@@ bar.html.tt
+sometimes, the bar, he eats you...

t/default_handler_as_plugin.t

@@ -1,7 +1,8 @@
 use strict;
 use warnings;
-use Test::More tests => 3;
+use Test::More tests => 9;
 use Test::Mojo;
+use File::Temp qw( tempdir );
 
 use Mojolicious::Lite;
 
@@ -10,8 +11,8 @@ app->plugin(
     tt_renderer => {
         template_options => {
             # These options are specific to TT
-            INCLUDE_PATH => 'templates',
-            COMPILE_DIR  => 'templates_c',
+            #INCLUDE_PATH => 'templates',
+            COMPILE_DIR  => tempdir( CLEANUP => 1 ),
             COMPILE_EXT  => '.ttc',
             # ... anything else to be passed on to TT should go here
         },
@@ -24,13 +25,29 @@ get '/' => sub {
     die 'foo';
 };
 
+get '/bar' => 'bar';
+
+get '/grimlock' => 'grimlock';
+
 my $t = Test::Mojo->new;
 
 $t->get_ok('/')
     ->status_is(500)
     ->content_like(qr{foo});
 
+$t->get_ok('/bar')
+    ->status_is(200)
+    ->content_like(qr{bar});
+
+$t->get_ok('/grimlock')
+    ->status_is(200)
+    ->content_like(qr{King});
+
 __DATA__
 
 @@ index.html.tt
 anything
+
+@@ bar.html.tt
+sometimes, the bar, he eats you...
+

t/default_handler_no_templates_dir.t

@@ -0,0 +1,40 @@
+use strict;
+use warnings;
+use File::Temp qw( tempdir );
+BEGIN { $ENV{MOJO_HOME} = tempdir( CLEANUP => 1) }
+use Test::More tests => 6;
+use Test::Mojo;
+
+use Mojolicious::Lite;
+plugin 'tt_renderer' => { template_options => { COMPILE_DIR  => tempdir( CLEANUP => 1 ) } };
+app->renderer->default_handler('tt');
+
+get '/' => sub {
+    die 'foo';
+};
+
+get '/bar' => 'bar';
+
+my $t = Test::Mojo->new;
+
+$t->get_ok('/')
+    ->status_is(500)
+    ->content_like(qr{foo});
+
+$t->app->log->on(message => sub {
+  my($log, $level, @lines) = @_;
+  diag @lines if $level eq 'error';
+});
+
+$t->get_ok('/bar')
+    ->status_is(200)
+    ->content_like(qr{sometimes, the bar,});
+
+__DATA__
+
+@@ index.html.tt
+anything
+
+@@ bar.html.tt
+sometimes, the bar, he eats you...
+

t/lite_app.t

@@ -12,13 +12,14 @@ 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}};
+plugin 'tt_renderer' => {template_options => {PRE_CHOMP => 1, POST_CHOMP => 1, TRIM => 1, COMPILE_DIR => tempdir( CLEANUP => 1 ) }};
 
 get '/exception' => 'error';
 

t/lite_app_with_default_layouts.t

@@ -0,0 +1,37 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+BEGIN { $ENV{MOJO_MODE}='testing'; };
+
+use utf8;
+
+use Test::More tests => 3;
+
+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 ) }};
+app->defaults(layout => 'wrapper');
+
+get '/test' => 'test';
+
+my $t = Test::Mojo->new;
+
+$t->get_ok('/test')->content_is("WS-hello-EW");
+
+__DATA__
+
+@@ test.html.tt
+hello
+
+@@ layouts/wrapper.html.tt
+WS-[%- content -%]-EW

t/multiple_paths.t

@@ -0,0 +1,31 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+BEGIN { $ENV{MOJO_MODE}='testing'; };
+
+use utf8;
+
+use Test::More tests => 6;
+
+use Mojolicious::Lite;
+use Test::Mojo;
+use File::Temp qw( tempdir );
+
+# Silence
+app->log->level('fatal');
+
+my @paths = map { app->home->rel_dir($_) } "templates/multiple_first", "templates/multiple_second";
+app->renderer->paths([@paths]);
+
+plugin 'TtRenderer' => {template_options => { COMPILE_DIR => tempdir( CLEANUP => 1 ) }};
+
+get '/first' => 'first';
+get '/second' => 'second';
+
+my $t = Test::Mojo->new;
+
+$t->get_ok('/first')->status_is(200)->content_like(qr/First/);
+$t->get_ok('/second')->status_is(200)->content_like(qr/Second/);
+

t/pod-coverage.t

@@ -1,21 +0,0 @@
-use strict;
-use warnings;
-use Test::More;
-
-# Ensure a recent version of Test::Pod::Coverage
-my $min_tpc = 1.08;
-eval "use Test::Pod::Coverage $min_tpc";
-plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
-    if $@;
-
-# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
-# but older versions don't recognize some common documentation styles
-my $min_pc = 0.18;
-eval "use Pod::Coverage $min_pc";
-plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
-    if $@;
-
-plan tests => 2;
-
-pod_coverage_ok('Mojolicious::Plugin::TtRenderer');
-pod_coverage_ok('Mojolicious::Plugin::TtRenderer::Engine', { also_private => [qr{^tt$}] } );

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/templates/Foo.pm

@@ -1,5 +1,7 @@
 package
-  Foo; 
+  Foo;
+use strict;
+use warnings;
 1;
 __DATA__ 
 

t/templates/grimlock.html.tt

@@ -0,0 +1 @@
+Me Grimlock King!

t/templates/multiple_first/first.html.tt

@@ -0,0 +1 @@
+First

t/templates/multiple_second/first.html.tt

@@ -0,0 +1 @@
+Second

t/templates/multiple_second/second.html.tt

@@ -0,0 +1 @@
+Second

t/tt_plugin_lite_app.t

@@ -5,16 +5,26 @@
 use strict;
 use warnings;
 
-use File::Temp;
+BEGIN {
+  unless($^O eq 'MSWin32') {
+    eval '# line '. __LINE__ . ' "' . __FILE__ . qq("\n). q{
+      use POSIX qw( setlocale LC_ALL );
+      setlocale(LC_ALL, 'C');
+    };
+    warn $@ if $@;
+  }
+}
+
+use File::Temp qw( tempdir );
 use Mojo::IOLoop;
 use Test::More;
 
 # Use a clean temporary directory
-BEGIN { $ENV{MOJO_TMPDIR} ||= File::Temp::tempdir }
+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.
@@ -24,7 +34,7 @@ use Mojolicious::Lite;
 use Test::Mojo;
 
 # POD renderer plugin
-plugin 'tt_renderer';
+plugin 'tt_renderer' => {template_options => { COMPILE_DIR => tempdir( CLEANUP => 1 ) }};
 
 # Silence
 app->log->level('error');
@@ -41,10 +51,12 @@ my $t = Test::Mojo->new;
 # Simple TT template
 $t->get_ok('/')->status_is(200)
   ->content_like(qr/test123456/);
-$t->get_ok('/blow')->status_is(500)->content_like(qr/file error - doesnotexist.tt: No such file or directory/);
+$t->get_ok('/blow')->status_is(500)->content_like(qr/file error - (templates\/)?doesnotexist\.tt: (No such file or directory|not found)/);
 
 if(eval q{ use Devel::Cycle; 1 })
 {
+  # ignore warnings coming from Devel::Cycle
+  local $SIG{__WARN__} = sub { };
   Devel::Cycle::find_cycle(app, sub {
     my $arg = shift;
     # Template::Provider (from which M::P::T::Provider inherits) has some cycles which are freed manaully by
@@ -56,4 +68,4 @@ if(eval q{ use Devel::Cycle; 1 })
       fail('Cycle found')
     }
   });
-};
+};

t/two_data.t

@@ -20,7 +20,7 @@ use_ok 'Foo';
 
 push @{app->renderer->classes}, 'Foo';
 
-plugin 'tt_renderer' => {template_options => {PRE_CHOMP => 1, POST_CHOMP => 1, TRIM => 1}};
+plugin 'tt_renderer' => {template_options => {PRE_CHOMP => 1, POST_CHOMP => 1, TRIM => 1, COMPILE_DIR => tempdir( CLEANUP => 1 )}};
 
 app->log->level('fatal'); 
 

xt/release/build_environment.t

@@ -0,0 +1,9 @@
+use strict;
+use warnings;
+use Test::More tests => 1;
+
+SKIP: {
+  eval q{ use Dist::Zilla::PluginBundle::Author::Plicease };
+  skip '[@Plicease] is not installed', 1 if $@;
+  ok $Dist::Zilla::PluginBundle::Author::Plicease::VERSION >= 1.45, '[@Plicease] >= 1.45';
+}

xt/release/changes.t

@@ -0,0 +1,27 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::CPAN::Changes' 
+    unless eval q{ use Test::CPAN::Changes; 1 };
+};
+use Test::CPAN::Changes;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+do {
+  my $old = \&Test::Builder::carp;
+  my $new = sub {
+    my($self, @messages) = @_;
+    return if $messages[0] =~ /^Date ".*" is not in the recommend format/;
+    $old->($self, @messages);
+  };
+  no warnings 'redefine';
+  *Test::Builder::carp = $new;
+};
+
+changes_file_ok;
+
+done_testing;

xt/release/eol.t

@@ -0,0 +1,14 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::EOL' 
+    unless eval q{ use Test::EOL; 1 };
+};
+use Test::EOL;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+all_perl_files_ok(grep { -e $_ } qw( bin lib t Makefile.PL ));

xt/release/fixme.t

@@ -0,0 +1,18 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Fixme' 
+    unless eval q{ use Test::Fixme; 1 };
+};
+use Test::Fixme 0.07;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+run_tests(
+  match => qr/FIXME/,
+  where => [ grep { -e $_ } qw( bin lib t Makefile.PL )],
+);
+

xt/release/no_tabs.t

@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::NoTabs' 
+    unless eval q{ use Test::NoTabs; 1 };
+};
+use Test::NoTabs;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL ));
+

xt/release/pod.t

@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Pod' 
+    unless eval q{ use Test::Pod; 1 };
+};
+use Test::Pod;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+all_pod_files_ok( grep { -e $_ } qw( bin lib ));
+

xt/release/pod_coverage.t

@@ -0,0 +1,69 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Pod::Coverage' 
+    unless eval q{ use Test::Pod::Coverage; 1 };
+  plan skip_all => 'test requires YAML'
+    unless eval q{ use YAML; 1; };
+};
+use Test::Pod::Coverage;
+use YAML qw( LoadFile );
+use FindBin;
+use File::Spec;
+
+my $config_filename = File::Spec->catfile(
+  $FindBin::Bin, 'release.yml'
+);
+
+my $config;
+$config = LoadFile($config_filename)
+  if -r $config_filename;
+
+plan skip_all => 'disabled' if $config->{pod_coverage}->{skip};
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+my @private_classes;
+my %private_methods;
+
+foreach my $private (@{ $config->{pod_coverage}->{private} })
+{
+  my($class,$method) = split /#/, $private;
+  if(defined $class && $class ne '')
+  {
+    my $regex = eval 'qr{^' . $class . '$}';
+    if(defined $method && $method ne '')
+    {
+      push @private_classes, { regex => $regex, method => $method };
+    }
+    else
+    {
+      push @private_classes, { regex => $regex, all => 1 };
+    }
+  }
+  elsif(defined $method && $method ne '')
+  {
+    $private_methods{$_} = 1 for split /,/, $method;
+  }
+}
+
+my @classes = all_modules;
+
+plan tests => scalar @classes;
+
+foreach my $class (@classes)
+{
+  SKIP: {
+    my($is_private_class) = map { 1 } grep { $class =~ $_->{regex} && $_->{all} } @private_classes;
+    skip "private class: $class", 1 if $is_private_class;
+    
+    my %methods = map {; $_ => 1 } map { split /,/, $_->{method} } grep { $class =~ $_->{regex} } @private_classes;
+    $methods{$_} = 1 for keys %private_methods;
+    
+    my $also_private = eval 'qr{^' . join('|', keys %methods ) . '$}';
+    
+    pod_coverage_ok $class, { also_private => [$also_private] };
+  };
+}
+

xt/release/pod_spelling_common.t

@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Pod::Spelling::CommonMistakes' 
+    unless eval q{ use Test::Pod::Spelling::CommonMistakes; 1 };
+};
+use Test::Pod::Spelling::CommonMistakes;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+# FIXME test files in bin too.
+all_pod_files_ok;

xt/release/pod_spelling_system.t

@@ -0,0 +1,101 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Spelling' 
+    unless eval q{ use Test::Spelling; 1 };
+  plan skip_all => 'test requires YAML'
+    unless eval q{ use YAML; 1; };
+};
+use Test::Spelling;
+use YAML qw( LoadFile );
+use FindBin;
+use File::Spec;
+
+my $config_filename = File::Spec->catfile(
+  $FindBin::Bin, 'release.yml'
+);
+
+my $config;
+$config = LoadFile($config_filename)
+  if -r $config_filename;
+
+plan skip_all => 'disabled' if $config->{pod_spelling_system}->{skip};
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+add_stopwords(@{ $config->{pod_spelling_system}->{stopwords} });
+add_stopwords(<DATA>);
+all_pod_files_spelling_ok;
+
+__DATA__
+Plicease
+stdout
+stderr
+stdin
+subref
+loopback
+username
+os
+Ollis
+Mojolicious
+plicease
+CPAN
+reinstall
+TODO
+filename
+filenames
+login
+callback
+callbacks
+standalone
+VMS
+hostname
+hostnames
+TCP
+UDP
+IP
+API
+MSWin32
+OpenBSD
+FreeBSD
+NetBSD
+unencrypted
+WebSocket
+WebSockets
+timestamp
+timestamps
+poney
+BackPAN
+portably
+RedHat
+AIX
+BSD
+XS
+FFI
+perlish
+optimizations
+subdirectory
+RESTful
+SQLite
+JavaScript
+dir
+plugins
+munge
+jQuery
+namespace
+PDF
+PDFs
+usernames
+DBI
+pluggable
+APIs
+SSL
+JSON
+YAML
+uncommented
+Solaris
+OpenVMS
+URI
+URL
+CGI

xt/release/release.yml

@@ -0,0 +1,36 @@
+---
+pod_spelling_system:
+  # list of words that are spelled correctly
+  # (regardless of what spell check thinks)
+  stopwords:
+    - Bethke
+    - Cosimo
+    - Crowther
+    - Holm 
+    - Htbaa
+    - Kitover
+    - Magnus
+    - Mojo
+    - Ramberg
+    - Streppone
+    - Vuets
+    - dir
+    - giftnuss
+    - mojo
+    - namespace
+    - renderer
+    - spleenjack
+    - vti
+    - app's
+    - renderer's
+    - Toolkit's
+    - Fayland
+    - TT
+    - uwisser
+
+pod_coverage:
+  # format is "Class#method" or "Class", regex allowed
+  # for either Class or method.
+  private:
+    - Mojolicious::Plugin::TtRenderer#register
+    - Mojolicious::Plugin::TtRenderer::Engine#tt

xt/release/strict.t

@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { 
+  plan skip_all => 'test requires Test::Strict' 
+    unless eval q{ use Test::Strict; 1 };
+};
+use Test::Strict;
+use FindBin;
+use File::Spec;
+
+chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
+
+all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL ));
+

xt/release/unused_vars.t

@@ -0,0 +1,63 @@
+use strict;
+use warnings;
+use Test::More;
+BEGIN { plan skip_all => 'test requires Test::Vars ' unless eval q{ use Test::Vars; 1 } }
+BEGIN { plan skip_all => 'test requires Path::Class' unless eval q{ use Path::Class::Dir; 1 } }
+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' unless defined $config->{unused_vars}->{skip} && !$config->{unused_vars}->{skip};
+
+my @modules;
+recurse($dir->subdir('lib'));
+
+sub recurse
+{
+  my $dir = shift;
+  foreach my $child ($dir->children)
+  {
+    if($child->is_dir)
+    {
+      recurse($child);
+    }
+    else
+    {
+      push @modules, $child if $child->basename =~ /\.pm$/;
+    }
+  }
+}
+
+plan tests => scalar @modules;
+
+my %global = (
+  ignore_vars => { map { $_ => 1 } @{ $config->{unused_vars}->{global}->{ignore_vars} } },
+);
+if(defined $config->{unused_vars}->{global}->{ignore_if})
+{
+  $global{ignore_if} = eval $config->{unused_vars}->{global}->{ignore_if};
+  die $@ if $@;
+}
+
+foreach my $file (@modules)
+{
+  my @mod = $file->components;
+  shift @mod; # get rid of '.';
+  shift @mod; # get rid of 'lib';
+  $mod[-1] =~ s/\.pm$//;
+  my $mod = join '::', @mod;
+  
+  my %local = %global;
+  foreach my $ignore (@{ $config->{unused_vars}->{module}->{$mod}->{ignore_vars} || []})
+  {
+    $local{ignore_vars}->{$ignore} = 1;
+  }
+  if(defined $config->{unused_vars}->{module}->{$mod}->{ignore_if})
+  {
+    $local{ignore_if} = eval $config->{unused_vars}->{module}->{$mod}->{ignore_if};
+    die $@ if $@;
+  }
+  
+  vars_ok($file, %local);
+}

xt/release/version.t

@@ -0,0 +1,36 @@
+use strict;
+use warnings;
+use Test::More;
+use FindBin ();
+BEGIN {
+  plan skip_all => "test requires Test::Version 1.001001"
+    unless eval q{ use Test::Version 1.001001 qw( version_all_ok ), { has_version => 1 }; 1 };
+  plan skip_all => "test requires Path::Class" 
+    unless eval q{ use Path::Class qw( file dir ); 1 };
+  plan skip_all => 'test requires YAML'
+    unless eval q{ use YAML; 1; };
+}
+
+use YAML qw( LoadFile );
+use FindBin;
+use File::Spec;
+
+plan skip_all => "test not built yet (run dzil test)"
+  unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL')
+  ||     -e dir( $FindBin::Bin)->parent->parent->file('Build.PL');
+
+my $config_filename = File::Spec->catfile(
+  $FindBin::Bin, 'release.yml'
+);
+
+my $config;
+$config = LoadFile($config_filename)
+  if -r $config_filename;
+
+if($config->{version}->{dir})
+{
+  note "using dir " . $config->{version}->{dir}
+}
+
+version_all_ok($config->{version}->{dir} ? ($config->{version}->{dir}) : ());
+done_testing;