X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FBuild.pm;h=944d9e8e1d46b4f4d07c6a6bbddb25b6dd32fc4d;hb=e5ecd5bc38bac3e2fcfaf643ea2a4c6ab46d7e57;hp=256a80d79a89af369cf13749aef2d1ec181549b4;hpb=91eeb37b4a08e92c5f893ccb1a8eddc862602651;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/Build.pm b/lib/Catalyst/Build.pm
index 256a80d..944d9e8 100644
--- a/lib/Catalyst/Build.pm
+++ b/lib/Catalyst/Build.pm
@@ -2,10 +2,14 @@ package Catalyst::Build;
 
 use strict;
 use Module::Build;
-use base 'Module::Build';
 use Path::Class;
 use File::Find 'find';
 
+our @ISA;
+eval "require Module::Build";
+die "Please install Module::Build\n" if $@;
+push @ISA, 'Module::Build';
+
 our @ignore =
   qw/Build Build.PL Changes MANIFEST META.yml Makefile.PL Makefile README
   _build blib lib script t/;
@@ -25,10 +29,42 @@ See L<Catalyst>
 
 L<Module::Build> extension for Catalyst.
 
+=head1 DEPRECATION NOTICE
+
+This module is deprecated in favor of L<Module::Install::Catalyst>. It's
+only left here for compability with older applications.
+
 =head1 METHODS
 
 =over 4
 
+=item new
+
+=cut
+
+sub new {
+    my $class = shift;
+    my $self  = $class->SUPER::new(@_);
+
+    my $app_name = $self->{properties}{module_name};
+    warn <<"EOF";
+
+ Note:
+
+    The use of Build.PL for building and distributing Catalyst
+    applications is deprecated in Catalyst 5.58.
+
+    We recommend using the new Module::Install-based Makefile
+    system.  You can generate a new Makefile.PL for your application
+    by running:
+
+        catalyst.pl -force -makefile $app_name
+
+EOF
+
+    return $self;
+}
+
 =item ACTION_install
 
 =cut
@@ -57,14 +93,14 @@ sub ACTION_fakeinstall {
 sub ACTION_install_extras {
     my $self    = shift;
     my $prefix  = $self->{properties}{destdir} || undef;
-    my $sitelib = $self->{config}{installsitelib};
+    my $sitelib = $self->install_destination('lib');
     my @path    = defined $prefix ? ( $prefix, $sitelib ) : ($sitelib);
     my $path    = dir( @path, split( '::', $self->{properties}{module_name} ) );
     my @files   = $self->_find_extras;
     print "Installing extras to $path\n";
     for (@files) {
         $FAKE
-          ? print "$_ -> $path/$_ (FAKE)\n"
+          ? print "$_ -> $path (FAKE)\n"
           : $self->copy_if_modified( $_, $path );
     }
 }
@@ -97,8 +133,8 @@ Sebastian Riedel, C<sri@oook.de>
 
 =head1 LICENSE
 
-This library is free software . You can redistribute it and/or modify it under
-the same terms as perl itself.
+This library is free software, you can redistribute it and/or modify it under
+the same terms as Perl itself.
 
 =cut