[svn:Module-Build] r12425 - in Module-Build/trunk: . lib/Module/Build

[ericwilhelm]

Author: ericwilhelm
Date: Mon Jan 12 22:25:53 2009
New Revision: 12425

Modified:
   Module-Build/trunk/Changes
   Module-Build/trunk/lib/Module/Build/Base.pm

Log:
lib/Module/Build/Base.pm - fix? double-prefix bug (RT#19951)
Changes                  - updated


Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes  (original)
+++ Module-Build/trunk/Changes  Mon Jan 12 22:25:53 2009
@@ -6,6 +6,9 @@
  - passthrough Makefile.PL will now play nice with cpantesters' on
    exit(0) (RT#32018) [Eric Wilhelm]
 
+ Bug Fixes
+ - fix for doubling-up of --prefix (RT#19951)
+
 0.31011 - Mon Jan 12 21:57:04 PST 2009
 
  Bug Fixes

Modified: Module-Build/trunk/lib/Module/Build/Base.pm
==============================================================================
--- Module-Build/trunk/lib/Module/Build/Base.pm (original)
+++ Module-Build/trunk/lib/Module/Build/Base.pm Mon Jan 12 22:25:53 2009
@@ -3966,8 +3966,6 @@
     return $self->_prefixify_default( $type, $rprefix );
   } elsif( !File::Spec->file_name_is_absolute($path) ) {
     $self->log_verbose("    path is relative, not prefixifying.\n");
-  } elsif( $sprefix eq $rprefix ) {
-    $self->log_verbose("  no new prefix.\n");
   } elsif( $path !~ s{^\Q$sprefix\E\b}{}s ) {
     $self->log_verbose("    cannot prefixify, falling back to default.\n");
     return $self->_prefixify_default( $type, $rprefix );