[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.433,1.434
Status: Beta
Brought to you by:
kwilliams
|
From: Ken W. <kwi...@us...> - 2005-06-22 02:45:59
|
Update of /cvsroot/module-build/Module-Build/lib/Module/Build In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13670 Modified Files: Base.pm Log Message: install_base : prefix :: install_base_relative : prefix_relative Index: Base.pm =================================================================== RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v retrieving revision 1.433 retrieving revision 1.434 diff -u -d -r1.433 -r1.434 --- Base.pm 22 Jun 2005 02:39:16 -0000 1.433 +++ Base.pm 22 Jun 2005 02:45:37 -0000 1.434 @@ -2570,7 +2570,7 @@ # Translated from ExtUtils::MM_Any::init_INSTALL_from_PREFIX -sub install_prefix_relative { +sub prefix_relative { my ($self, $type, $prefix) = @_; my $c = $self->{config}; @@ -2710,7 +2710,7 @@ return $p->{install_path}{$type} if exists $p->{install_path}{$type}; return File::Spec->catdir($p->{install_base}, $self->install_base_relative($type)) if $p->{install_base}; - return $self->install_prefix_relative($type, $p->{prefix}) if $p->{prefix}; + return $self->prefix_relative($type, $p->{prefix}) if $p->{prefix}; return $p->{install_sets}{ $p->{installdirs} }{$type}; } |