Compare commits

...
4 Commits
Author SHA1 Message Date
Graham Ollis 5870c014c2 v1.52
- updated repository name
2014-05-08 19:27:10 -04:00
Graham Ollis 8dcb4147f7 updated repostiryo name 2014-05-08 19:25:32 -04:00
Graham Ollis c489fbc86e update diagnostic and release tets 2014-05-08 19:25:20 -04:00
Graham Ollis 9699560925 clean up deps 2014-03-21 15:06:29 -04:00
8 changed files with 184 additions and 19 deletions
+3
View File
@@ -2,6 +2,9 @@ Revision history for Mojolicious::Plugin::TtRenderer
{{$NEXT}}
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
+19 -4
View File
@@ -5,7 +5,7 @@ license = Perl_5
copyright_holder = Ask Bjørn Hansen
# copyright_year = 2009
version = 1.51
version = 1.52
[@Author::Plicease]
release_tests = 1
@@ -19,9 +19,9 @@ Template = 2.18
Test::More = 0
[MetaResources]
bugtracker.web = https://github.com/plicease/mojox-renderer-tt/issues
repository.web = http://github.com/plicease/mojox-renderer-tt
repository.url = git://github.com/plicease/mojox-renderer-tt.git
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]
@@ -54,3 +54,18 @@ contributor = uwisser
[MetaNoIndex]
directory = example
[RemovePrereqs]
; comes with Perl
remove = warnings
remove = strict
remove = base
remove = Carp
remove = Cwd
remove = File::Spec
remove = Scalar::Util
; comes with Mojolicious
remove = Mojo::Base
remove = Mojo::ByteStream
remove = Mojolicious::Plugin
+34 -6
View File
@@ -1,5 +1,6 @@
use strict;
use warnings;
use Config;
use Test::More tests => 1;
BEGIN {
my @modules;
@@ -18,6 +19,13 @@ BEGIN {
eval qq{ require $_ } for @modules;
};
sub spacer ()
{
diag '';
diag '';
diag '';
}
pass 'okay';
my @modules;
@@ -33,9 +41,30 @@ my $max = 1;
$max = $_ > $max ? $_ : $max for map { length $_ } @modules;
our $format = "%-${max}s %s";
diag '';
diag '';
diag '';
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;
@@ -56,6 +85,5 @@ foreach my $module (@modules)
}
}
diag '';
diag '';
diag '';
spacer;
-8
View File
@@ -1,23 +1,15 @@
Carp
Cwd
EV
ExtUtils::MakeMaker
File::Spec
File::Temp
FindBin
IO::Handle
IPC::Open3
Mojo::Base
Mojo::ByteStream
Mojo::IOLoop
Mojolicious
Mojolicious::Lite
Mojolicious::Plugin
POSIX
Scalar::Util
Template
Template::Provider
Test::CPAN::Meta
Test::Mojo
Test::More
lib
+1 -1
View File
@@ -5,5 +5,5 @@ 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 >= 0.7, '[@Plicease] >= 0.7';
ok $Dist::Zilla::PluginBundle::Author::Plicease::VERSION >= 1.45, '[@Plicease] >= 1.45';
}
+2
View File
@@ -20,6 +20,8 @@ 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;
+62
View File
@@ -20,6 +20,8 @@ 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} });
@@ -29,6 +31,7 @@ all_pod_files_spelling_ok;
__DATA__
Plicease
stdout
stderr
stdin
subref
loopback
@@ -37,3 +40,62 @@ 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
+63
View File
@@ -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' if $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);
}