X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Flocal%2Flib.pm;h=d45ed1dac3951b35ed0db325472d1c8289c4435a;hb=37bd064d596047a1b286aaf34c4518f1bcca7c5f;hp=6b1f5f9c00080343fbd9f1e7877c98ecb489b021;hpb=fe03358f442f762eb8872cbb9ede5b4380493c72;p=p5sagit%2Flocal-lib.git

diff --git a/lib/local/lib.pm b/lib/local/lib.pm
index 6b1f5f9..d45ed1d 100644
--- a/lib/local/lib.pm
+++ b/lib/local/lib.pm
@@ -157,11 +157,7 @@ sub resolve_home_path {
   my ($user) = ($path =~ /^~([^\/]+)/); # can assume ^~ so undef for 'us'
   my $tried_file_homedir;
   my $homedir = do {
-    if (
-        eval { require File::HomeDir }
-        # Use CPAN::Version if available as it deals correctly with dev releases
-        && (eval { require CPAN::Version; } ? CPAN::Version->vgt($File::HomeDir::VERSION, 0.65) : $File::HomeDir::VERSION >= 0.65
-    )) {
+    if (eval { require File::HomeDir } && $File::HomeDir::VERSION >= 0.65) {
       $tried_file_homedir = 1;
       if (defined $user) {
         File::HomeDir->users_home($user);