[Bps-public-commit] Shipwright branch, master, updated. c22695646561949d9481f88a03e760f87df46864

jesse jesse at bestpractical.com
Mon Jul 6 15:10:17 EDT 2009


The branch, master has been updated
       via  c22695646561949d9481f88a03e760f87df46864 (commit)
      from  dd6da8213f4e9b0e00b5b3fcd3c82c0508472607 (commit)

Summary of changes:
 Makefile.PL                   |    1 -
 lib/Shipwright/Source/CPAN.pm |    3 +--
 2 files changed, 1 insertions(+), 3 deletions(-)

- Log -----------------------------------------------------------------
commit c22695646561949d9481f88a03e760f87df46864
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Mon Jul 6 15:10:08 2009 -0400

    Remove dependency on File::HomeDir

diff --git a/Makefile.PL b/Makefile.PL
index 22afea2..2b63830 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -15,7 +15,6 @@ requires 'CPAN::DistnameInfo' => 0;
 requires 'Class::Accessor::Fast' => 0;
 requires 'File::Temp' => 0;
 requires 'File::Copy' => 0;
-requires 'File::HomeDir' => 0;
 requires 'File::Copy::Recursive' => 0;
 requires 'File::Spec' => 0;
 requires 'File::Slurp' => 0;
diff --git a/lib/Shipwright/Source/CPAN.pm b/lib/Shipwright/Source/CPAN.pm
index 7f93d16..9e741fb 100644
--- a/lib/Shipwright/Source/CPAN.pm
+++ b/lib/Shipwright/Source/CPAN.pm
@@ -10,7 +10,6 @@ use Data::Dumper;
 use File::Temp qw/tempdir/;
 use File::Slurp;
 use CPAN::DistnameInfo;
-use File::HomeDir;
 
 use base qw/Shipwright::Source::Base/;
 
@@ -38,7 +37,7 @@ sub new {
         require CPAN::Config;
     }
 
-    unshift @INC, catdir( File::HomeDir->my_home, '.cpan' );
+    unshift @INC, catdir( $ENV{'HOME'}, '.cpan' );
     if ( Module::Info->new_from_module('CPAN::MyConfig') ) {
 
         # keep user's CPAN::MyConfig too

-----------------------------------------------------------------------



More information about the Bps-public-commit mailing list