X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2Flocal-lib.git;a=blobdiff_plain;f=lib%2Flocal%2Flib.pm;h=c5b799552feea997a1a381f57c28598bcd7bfd23;hp=831e8b44af191f1d066e4a3bfaecbbb248401119;hb=c6611e1c90fb9afe371ebf7f4e9b88eb35acc574;hpb=efeadddf4fbd4d74f66345688f61cfba3125db82 diff --git a/lib/local/lib.pm b/lib/local/lib.pm index 831e8b4..c5b7995 100644 --- a/lib/local/lib.pm +++ b/lib/local/lib.pm @@ -321,12 +321,7 @@ sub setup_env_hash { } sub print_environment_vars_for { - my $self = $_[0]->new->activate($_[1]); - $self->print_environment_vars; -} -sub print_environment_vars { - my $self = shift; - print $self->environment_vars_string; + print $_[0]->environment_vars_string_for(@_[1..$#_]); } sub environment_vars_string_for {