[ SEA-GHOST MINI SHELL]

package CPANPLUS::Config::HomeEnv;

use strict;
use File::Spec;
use vars qw($VERSION);

$VERSION = "0.9138";

sub setup {
  my $conf = shift;
  $conf->set_conf( base => File::Spec->catdir( $ENV{PERL5_CPANPLUS_HOME}, '.cpanplus' ) )
	  if $ENV{PERL5_CPANPLUS_HOME};
  return 1;
}

qq'Wherever I hang my hat is home';

__END__

=head1 NAME

CPANPLUS::Config::HomeEnv - Set the environment for the CPANPLUS base dir

=head1 SYNOPSIS

  export PERL5_CPANPLUS_HOME=/home/moo/perls/conf/perl-5.8.9/

=head1 DESCRIPTION

CPANPLUS::Config::HomeEnv is a L<CPANPLUS::Config> file that allows the CPANPLUS user to
specify where L<CPANPLUS> gets its configuration from.

Setting the environment variable C<PERL5_CPANPLUS_HOME> to a path location, determines
where the C<.cpanplus> directory will be located.

=head1 METHODS

=over

=item C<setup>

Called by L<CPANPLUS::Configure>.

=back

=head1 AUTHOR

Chris C<BinGOs> Williams <chris@bingosnet.co.uk>

Contributions and patience from Jos Boumans the L<CPANPLUS> guy!

=head1 LICENSE

Copyright E<copy> Chris Williams and Jos Boumans.

This module may be used, modified, and distributed under the same terms as Perl itself. Please see the license that came with your Perl distribution for details.

=head1 SEE ALSO

L<CPANPLUS>

=cut