gistfile1.php

diff --git a/lib/Module/Install/Catalyst.pm b/lib/Module/Install/Catalyst.pm
index 5d45b69..33d2cd5 100644
--- a/lib/Module/Install/Catalyst.pm
+++ b/lib/Module/Install/Catalyst.pm
@@ -8,7 +8,7 @@ require Module::Install::Base;
 
 use File::Find;
 use FindBin;
-use File::Copy::Recursive 'rcopy';
+use File::Copy::Recursive;
 use File::Spec ();
 use Getopt::Long ();
 use Data::Dumper;
@@ -58,6 +58,14 @@ command called in C<Makefile.PL>.
 
 sub catalyst {
     my $self = shift;
+
+    if($Module::Install::AUTHOR) {
+        $self->admin->copy_package(
+            'File::Copy::Recursive',
+            $INC{"File/Copy/Recursive.pm"},
+        );
+    }
+
     print <<EOF;
 *** Module::Install::Catalyst
 EOF
@@ -78,7 +86,6 @@ ignore list are excluded (see L<catalyst_ignore> and L<catalyst_ignore_all>).
 
 sub catalyst_files {
     my $self = shift;
-
     chdir $FindBin::Bin;
 
     my @files;