Perl-Dist-WiX

changeset 1063:abd5573beeeb

Make Assets have strict constructors.
author Curtis Jewell <perl@curtisjewell.name>
date Sun Jun 19 05:01:23 2011 -0600 (2011-06-19)
parents 279135cd7736
children 5b199d3c8e9e
files lib/Perl/Dist/WiX/Asset/Binary.pm lib/Perl/Dist/WiX/Asset/DistBase.pm lib/Perl/Dist/WiX/Asset/DistFile.pm lib/Perl/Dist/WiX/Asset/Distribution.pm lib/Perl/Dist/WiX/Asset/File.pm lib/Perl/Dist/WiX/Asset/Launcher.pm lib/Perl/Dist/WiX/Asset/Library.pm lib/Perl/Dist/WiX/Asset/Module.pm lib/Perl/Dist/WiX/Asset/PAR.pm lib/Perl/Dist/WiX/Asset/Perl.pm lib/Perl/Dist/WiX/Asset/Website.pm
line diff
     1.1 --- a/lib/Perl/Dist/WiX/Asset/Binary.pm	Thu Jun 16 01:02:18 2011 -0600
     1.2 +++ b/lib/Perl/Dist/WiX/Asset/Binary.pm	Sun Jun 19 05:01:23 2011 -0600
     1.3 @@ -46,6 +46,7 @@
     1.4  
     1.5  use 5.010;
     1.6  use Moose;
     1.7 +use WiX3::Util::StrictConstructor;
     1.8  use MooseX::Types::Moose qw( Str HashRef Maybe );
     1.9  use File::Spec::Functions qw( catdir );
    1.10  
     2.1 --- a/lib/Perl/Dist/WiX/Asset/DistBase.pm	Thu Jun 16 01:02:18 2011 -0600
     2.2 +++ b/lib/Perl/Dist/WiX/Asset/DistBase.pm	Sun Jun 19 05:01:23 2011 -0600
     2.3 @@ -2,6 +2,7 @@
     2.4  
     2.5  use 5.010;
     2.6  use Moose;
     2.7 +use WiX3::Util::StrictConstructor;
     2.8  use File::Spec::Functions qw( catdir catfile );
     2.9  use Params::Util qw ( _INSTANCE );
    2.10  
     3.1 --- a/lib/Perl/Dist/WiX/Asset/DistFile.pm	Thu Jun 16 01:02:18 2011 -0600
     3.2 +++ b/lib/Perl/Dist/WiX/Asset/DistFile.pm	Sun Jun 19 05:01:23 2011 -0600
     3.3 @@ -55,6 +55,7 @@
     3.4  
     3.5  use 5.010;
     3.6  use Moose;
     3.7 +use WiX3::Util::StrictConstructor;
     3.8  use MooseX::Types::Moose        qw( Str Maybe Bool ArrayRef );
     3.9  use File::Spec::Functions       qw( catdir catfile splitpath );
    3.10  use URI                         qw();
     4.1 --- a/lib/Perl/Dist/WiX/Asset/Distribution.pm	Thu Jun 16 01:02:18 2011 -0600
     4.2 +++ b/lib/Perl/Dist/WiX/Asset/Distribution.pm	Sun Jun 19 05:01:23 2011 -0600
     4.3 @@ -49,6 +49,7 @@
     4.4  
     4.5  use 5.010;
     4.6  use Moose;
     4.7 +use WiX3::Util::StrictConstructor;
     4.8  use MooseX::Types::Moose   qw( Str Bool ArrayRef Maybe );
     4.9  use File::Spec::Functions  qw( catdir catfile );
    4.10  use Params::Util           qw( _INSTANCE );
     5.1 --- a/lib/Perl/Dist/WiX/Asset/File.pm	Thu Jun 16 01:02:18 2011 -0600
     5.2 +++ b/lib/Perl/Dist/WiX/Asset/File.pm	Sun Jun 19 05:01:23 2011 -0600
     5.3 @@ -37,6 +37,7 @@
     5.4  
     5.5  use 5.010;
     5.6  use Moose;
     5.7 +use WiX3::Util::StrictConstructor;
     5.8  use MooseX::Types::Moose qw( Str );
     5.9  use File::Spec::Functions qw( catfile );
    5.10  use File::List::Object qw();
     6.1 --- a/lib/Perl/Dist/WiX/Asset/Launcher.pm	Thu Jun 16 01:02:18 2011 -0600
     6.2 +++ b/lib/Perl/Dist/WiX/Asset/Launcher.pm	Sun Jun 19 05:01:23 2011 -0600
     6.3 @@ -38,6 +38,7 @@
     6.4  
     6.5  use 5.010;
     6.6  use Moose;
     6.7 +use WiX3::Util::StrictConstructor;
     6.8  use MooseX::Types::Moose qw( Str Bool );
     6.9  use File::Spec::Functions qw( catfile );
    6.10  use Perl::Dist::WiX::Exceptions;
     7.1 --- a/lib/Perl/Dist/WiX/Asset/Library.pm	Thu Jun 16 01:02:18 2011 -0600
     7.2 +++ b/lib/Perl/Dist/WiX/Asset/Library.pm	Sun Jun 19 05:01:23 2011 -0600
     7.3 @@ -53,6 +53,7 @@
     7.4  
     7.5  use 5.010;
     7.6  use Moose;
     7.7 +use WiX3::Util::StrictConstructor;
     7.8  use MooseX::Types::Moose qw( Str Maybe HashRef );
     7.9  
    7.10  our $VERSION = '1.550';
     8.1 --- a/lib/Perl/Dist/WiX/Asset/Module.pm	Thu Jun 16 01:02:18 2011 -0600
     8.2 +++ b/lib/Perl/Dist/WiX/Asset/Module.pm	Sun Jun 19 05:01:23 2011 -0600
     8.3 @@ -28,6 +28,7 @@
     8.4  #<<<
     8.5  use 5.010;
     8.6  use Moose;
     8.7 +use WiX3::Util::StrictConstructor;
     8.8  use MooseX::Types::Moose         qw( Maybe Str Bool );
     8.9  use Perl::Dist::WiX::Types       qw( OneOrManyStr );
    8.10  use English                      qw( -no_match_vars );
     9.1 --- a/lib/Perl/Dist/WiX/Asset/PAR.pm	Thu Jun 16 01:02:18 2011 -0600
     9.2 +++ b/lib/Perl/Dist/WiX/Asset/PAR.pm	Sun Jun 19 05:01:23 2011 -0600
     9.3 @@ -47,6 +47,7 @@
     9.4  
     9.5  use 5.010;
     9.6  use Moose;
     9.7 +use WiX3::Util::StrictConstructor;
     9.8  use MooseX::Types::Moose qw( Str );
     9.9  use File::Spec::Functions qw( catdir catfile );
    9.10  use English qw( -no_match_vars );
    10.1 --- a/lib/Perl/Dist/WiX/Asset/Perl.pm	Thu Jun 16 01:02:18 2011 -0600
    10.2 +++ b/lib/Perl/Dist/WiX/Asset/Perl.pm	Sun Jun 19 05:01:23 2011 -0600
    10.3 @@ -42,6 +42,7 @@
    10.4  
    10.5  use 5.010;
    10.6  use Moose;
    10.7 +use WiX3::Util::StrictConstructor;
    10.8  use MooseX::Types::Moose   qw( Str HashRef ArrayRef Bool Maybe );
    10.9  use File::Spec::Functions  qw( catdir splitpath rel2abs catfile );
   10.10  use File::Basename         qw();
    11.1 --- a/lib/Perl/Dist/WiX/Asset/Website.pm	Thu Jun 16 01:02:18 2011 -0600
    11.2 +++ b/lib/Perl/Dist/WiX/Asset/Website.pm	Sun Jun 19 05:01:23 2011 -0600
    11.3 @@ -29,6 +29,7 @@
    11.4  
    11.5  use 5.010;
    11.6  use Moose;
    11.7 +use WiX3::Util::StrictConstructor;
    11.8  use MooseX::Types::Moose qw( Str Int Maybe );
    11.9  use File::Spec::Functions qw( catfile splitpath );
   11.10  use English qw( -no_match_vars );