Code-TidyAll

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Specio::Declare" : "0",
            "Specio::Library::Builtins" : "0",
            "Specio::Library::Numeric" : "0",
            "Specio::Library::Path::Tiny" : "0.04",
            "Specio::Library::String" : "0",
            "Test::Builder" : "0",
            "Text::Diff" : "1.44",
            "Text::Diff::Table" : "0",
            "Text::ParseWords" : "0",
            "Time::Duration::Parse" : "0",
            "Try::Tiny" : "0",
            "base" : "0",
            "constant" : "0",
            "perl" : "5.008008",
            "strict" : "0",
            "warnings" : "0"
         }
      },
      "test" : {
         "recommends" : {
            "CPAN::Meta" : "2.120900"

META.yml  view on Meta::CPAN

  Specio::Declare: '0'
  Specio::Library::Builtins: '0'
  Specio::Library::Numeric: '0'
  Specio::Library::Path::Tiny: '0.04'
  Specio::Library::String: '0'
  Test::Builder: '0'
  Text::Diff: '1.44'
  Text::Diff::Table: '0'
  Text::ParseWords: '0'
  Time::Duration::Parse: '0'
  Try::Tiny: '0'
  base: '0'
  constant: '0'
  perl: '5.008008'
  strict: '0'
  warnings: '0'
resources:
  bugtracker: https://github.com/houseabsolute/perl-code-tidyall/issues
  homepage: https://metacpan.org/release/Code-TidyAll
  repository: git://github.com/houseabsolute/perl-code-tidyall.git
version: '0.85'

Makefile.PL  view on Meta::CPAN

    "Specio::Declare" => 0,
    "Specio::Library::Builtins" => 0,
    "Specio::Library::Numeric" => 0,
    "Specio::Library::Path::Tiny" => "0.04",
    "Specio::Library::String" => 0,
    "Test::Builder" => 0,
    "Text::Diff" => "1.44",
    "Text::Diff::Table" => 0,
    "Text::ParseWords" => 0,
    "Time::Duration::Parse" => 0,
    "Try::Tiny" => 0,
    "base" => 0,
    "constant" => 0,
    "strict" => 0,
    "warnings" => 0
  },
  "TEST_REQUIRES" => {
    "Encode" => 0,
    "ExtUtils::MakeMaker" => 0,
    "File::Spec" => 0,
    "FindBin" => 0,

Makefile.PL  view on Meta::CPAN

  "Test::Builder" => 0,
  "Test::Class::Most" => 0,
  "Test::Differences" => 0,
  "Test::Fatal" => 0,
  "Test::More" => "0.96",
  "Test::Warnings" => 0,
  "Text::Diff" => "1.44",
  "Text::Diff::Table" => 0,
  "Text::ParseWords" => 0,
  "Time::Duration::Parse" => 0,
  "Try::Tiny" => 0,
  "autodie" => 0,
  "base" => 0,
  "constant" => 0,
  "lib::relative" => 0,
  "strict" => 0,
  "warnings" => 0
);

unless ( eval { ExtUtils::MakeMaker->VERSION('6.63_03') } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};

cpanfile  view on Meta::CPAN

requires "Specio::Declare" => "0";
requires "Specio::Library::Builtins" => "0";
requires "Specio::Library::Numeric" => "0";
requires "Specio::Library::Path::Tiny" => "0.04";
requires "Specio::Library::String" => "0";
requires "Test::Builder" => "0";
requires "Text::Diff" => "1.44";
requires "Text::Diff::Table" => "0";
requires "Text::ParseWords" => "0";
requires "Time::Duration::Parse" => "0";
requires "Try::Tiny" => "0";
requires "base" => "0";
requires "constant" => "0";
requires "perl" => "5.008008";
requires "strict" => "0";
requires "warnings" => "0";
recommends "Parallel::ForkManager" => "0";

on 'test' => sub {
  requires "Encode" => "0";
  requires "ExtUtils::MakeMaker" => "0";

lib/Code/TidyAll.pm  view on Meta::CPAN

use Module::Runtime qw( use_module );
use Path::Tiny      qw(path);
use Scalar::Util    qw(blessed);
use Specio 0.40;
use Specio::Declare;
use Specio::Library::Builtins;
use Specio::Library::Numeric;
use Specio::Library::Path::Tiny 0.04;
use Specio::Library::String;
use Time::Duration::Parse qw(parse_duration);
use Try::Tiny;

use Moo 2.000000;

our $VERSION = '0.85';

sub default_conf_names { ( 'tidyall.ini', '.tidyallrc' ) }

# External
has backup_ttl => (
    is      => 'ro',

lib/Code/TidyAll/Git/Precommit.pm  view on Meta::CPAN


use Capture::Tiny            qw(capture_stdout capture_stderr);
use Code::TidyAll::Git::Util qw(git_files_to_commit);
use Code::TidyAll;
use IPC::System::Simple qw(capturex run);
use Log::Any            qw($log);
use Path::Tiny          qw(path);
use Scope::Guard        qw(guard);
use Specio::Library::Builtins;
use Specio::Library::String;
use Try::Tiny;

use Moo;

our $VERSION = '0.85';

has conf_name => (
    is  => 'ro',
    isa => t('NonEmptyStr'),
);

lib/Code/TidyAll/Git/Prereceive.pm  view on Meta::CPAN


use Capture::Tiny       qw(capture);
use Code::TidyAll::Util qw(tempdir_simple);
use Code::TidyAll;
use Digest::SHA         qw(sha1_hex);
use IPC::System::Simple qw(capturex run);
use Path::Tiny          qw(cwd path);
use Specio::Library::Builtins;
use Specio::Library::Numeric;
use Specio::Library::String;
use Try::Tiny;

use Moo;

our $VERSION = '0.85';

has allow_repeated_push => (
    is      => 'ro',
    isa     => t('PositiveInt'),
    default => 3,
);

lib/Code/TidyAll/Role/GenericExecutable.pm  view on Meta::CPAN

package Code::TidyAll::Role::GenericExecutable;

use strict;
use warnings;

use IPC::Run3 qw(run3);
use Specio::Library::Builtins;
use Specio::Library::String;
use Text::ParseWords qw(shellwords);
use Try::Tiny;

use Moo::Role;

with 'Code::TidyAll::Role::RunsCommand';

our $VERSION = '0.85';

has 'cmd' => (
    is       => 'ro',
    required => 1,

lib/Code/TidyAll/Role/RunsCommand.pm  view on Meta::CPAN

package Code::TidyAll::Role::RunsCommand;

use strict;
use warnings;

use IPC::Run3       qw(run3);
use List::SomeUtils qw(any);
use Specio::Library::Builtins;
use Specio::Library::Numeric;
use Text::ParseWords qw(shellwords);
use Try::Tiny;

use Moo::Role;

our $VERSION = '0.85';

has ok_exit_codes => (
    is      => 'ro',
    isa     => t( 'ArrayRef', of => t('PositiveOrZeroInt') ),
    default => sub { [0] },
);

lib/Code/TidyAll/SVN/Precommit.pm  view on Meta::CPAN


use strict;
use warnings;

use Capture::Tiny       qw(capture_stdout capture_stderr);
use Code::TidyAll::Util qw(tempdir_simple);
use Code::TidyAll;
use Log::Any   qw($log);
use Path::Tiny qw(path);
use SVN::Look;
use Try::Tiny;

use Moo;

our $VERSION = '0.85';

# Public
has conf_name                => ( is => 'ro' );
has emergency_comment_prefix => ( is => 'ro', default => 'NO TIDYALL' );
has extra_conf_files         => ( is => 'ro', default => sub { [] } );
has reject_on_error          => ( is => 'ro' );

t/00-report-prereqs.dd  view on Meta::CPAN

                                      'Specio::Declare' => '0',
                                      'Specio::Library::Builtins' => '0',
                                      'Specio::Library::Numeric' => '0',
                                      'Specio::Library::Path::Tiny' => '0.04',
                                      'Specio::Library::String' => '0',
                                      'Test::Builder' => '0',
                                      'Text::Diff' => '1.44',
                                      'Text::Diff::Table' => '0',
                                      'Text::ParseWords' => '0',
                                      'Time::Duration::Parse' => '0',
                                      'Try::Tiny' => '0',
                                      'base' => '0',
                                      'constant' => '0',
                                      'perl' => '5.008008',
                                      'strict' => '0',
                                      'warnings' => '0'
                                    }
                    },
       'test' => {
                   'recommends' => {
                                     'CPAN::Meta' => '2.120900'

t/lib/TestFor/Code/TidyAll/Git.pm  view on Meta::CPAN

use Capture::Tiny            qw(capture capture_stderr);
use Code::TidyAll::Git::Util qw(git_files_to_commit git_modified_files);
use Code::TidyAll::Util      qw(tempdir_simple);
use Code::TidyAll;
use File::pushd qw(pushd);
use File::Spec;
use FindBin             qw( $Bin );
use IPC::System::Simple qw(capturex runx);
use Path::Tiny          qw(path);
use Test::Class::Most parent => 'TestHelper::Test::Class';
use Try::Tiny;

use constant IS_WIN32 => $^O eq 'MSWin32';

my ( $precommit_hook_template, $prereceive_hook_template, $tidyall_ini_template );

$ENV{GIT_AUTHOR_NAME}  = $ENV{GIT_COMMITTER_NAME}  = 'G. Author';
$ENV{GIT_AUTHOR_EMAIL} = $ENV{GIT_COMMITTER_EMAIL} = 'git-author@example.com';

# Ignore local configuration files, which may change the default branch from
# "master" to "main".

t/lib/TestFor/Code/TidyAll/Parallel.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Parallel;

use Test::Class::Most parent => 'TestHelper::Test::Class';
use strict;
use warnings;

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Parallel::ForkManager )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/MasonTidy.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::MasonTidy;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Mason::Tidy )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/PerlCritic.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PerlCritic;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Code::TidyAll::Plugin::PerlCritic;
use Module::Runtime qw( require_module );
use Try::Tiny;

sub test_main : Tests {
    my $self = shift;

    return unless $self->require_executable( Code::TidyAll::Plugin::PerlCritic->_build_cmd );

    my $rc_file = $self->{root_dir}->child('perlcriticrc');
    $rc_file->spew("only = 1\nseverity = 1\n[TestingAndDebugging::RequireUseStrict]\n");

    $self->tidyall(

t/lib/TestFor/Code/TidyAll/Plugin/PerlTidy.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PerlTidy;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Getopt::Long;
use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Perl::Tidy )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/PerlTidySweet.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PerlTidySweet;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Perl::Tidy::Sweetened )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/PodChecker.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PodChecker;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Pod::Checker )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/PodSpell.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PodSpell;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Pod::Spell )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/Plugin/PodTidy.pm  view on Meta::CPAN

package TestFor::Code::TidyAll::Plugin::PodTidy;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Module::Runtime qw( require_module );
use Try::Tiny;

BEGIN {
    for my $mod (qw( Pod::Tidy )) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;
        }
    }
}

t/lib/TestFor/Code/TidyAll/SpacesInPaths.pm  view on Meta::CPAN


use strict;
use warnings;

use Test::Class::Most parent => 'TestFor::Code::TidyAll::Plugin';

use Code::TidyAll::Plugin::PerlCritic;
use Code::TidyAll::Util qw(tempdir_simple);
use Module::Runtime     qw( require_module );
use Path::Tiny          qw( cwd );
use Try::Tiny;

BEGIN {
    my @mods
        = qw( Mason::Tidy Perl::Critic Perl::Tidy Perl::Tidy::Sweetened Pod::Checker Pod::Tidy );
    push @mods, 'Pod::Spell'
        unless $^O eq 'MSWin32';
    for my $mod (@mods) {
        unless ( try { require_module($mod); 1 } ) {
            __PACKAGE__->SKIP_CLASS("This test requires the $mod module");
            return;



( run in 1.495 second using v1.01-cache-2.11-cpan-05444aca049 )