-use ExtUtils::MakeMaker;
-WriteMakefile(
- 'NAME' => 'Catalyst::Plugin::Cache',
- 'VERSION_FROM' => 'lib/Catalyst/Plugin/Cache.pm',
- 'PREREQ_PM' => {
- 'Catalyst' => '5.7',
- 'Storable' => 0,
- 'Task::Weaken' => 0,
- 'Test::Deep' => 0,
- 'Test::Exception' => 0,
- 'Test::More' => 0,
- 'MRO::Compat' => 0,
- 'ok' => 0,
- },
- 'INSTALLDIRS' => 'site',
- 'EXE_FILES' => [],
- 'PL_FILES' => {},
-);
+use inc::Module::Install;
+
+name 'Catalyst-Plugin-Cache';
+all_from 'lib/Catalyst/Plugin/Cache.pm';
+requires 'Catalyst' => '5.7';
+requires 'Storable' => 0;
+requires 'Task::Weaken' => 0;
+test_requires 'Test::Deep' => 0;
+test_requires 'Test::Exception' => 0;
+test_requires 'Test::More' => '0.88';
+requires 'MRO::Compat' => 0;
+
+resources repository => 'http://dev.catalyst.perl.org/repos/Catalyst/trunk/Catalyst-Plugin-Cache';
+WriteAll;
+
use Test::More 'no_plan';
use Test::Exception;
-use ok "Catalyst::Plugin::Cache";
+use_ok "Catalyst::Plugin::Cache";
use Catalyst::Plugin::Cache::Backend::Memory;
use strict;
use warnings;
-use Test::More 'no_plan';
+use Test::More;
-use ok "Catalyst::Plugin::Cache";
+use_ok "Catalyst::Plugin::Cache";
{
package MockApp;
is_deeply( $registered, MyCache->new({ param => "foo" }), "params sent correctly" );
+done_testing;
+
use strict;
use warnings;
-use Test::More 'no_plan';
+use Test::More;
use Test::Deep qw/superhashof cmp_deeply/;
use Scalar::Util qw/refaddr/;
-use ok "Catalyst::Plugin::Cache";
+use_ok "Catalyst::Plugin::Cache";
{
package MockApp;
is( refaddr( $c->cache("bar") ), refaddr( $c->cache("bar") ), "since bar is hard coded as an object it's always the same" );
+done_testing;
+
use strict;
use warnings;
-use Test::More 'no_plan';
+use Test::More;
-use ok "Catalyst::Plugin::Cache";
-use ok "Catalyst::Plugin::Cache::Choose::KeyRegexes";
+use_ok "Catalyst::Plugin::Cache";
+use_ok "Catalyst::Plugin::Cache::Choose::KeyRegexes";
use Catalyst::Plugin::Cache::Backend::Memory;
is( $c->get_cache_backend("bar_store")->get("foo_laa"), undef, "no foo key" );
is( $c->get_cache_backend("bar_store")->get("bar_laa"), "laa", "has bar key" );
+done_testing;