File tree 1 file changed +2
-0
lines changed
1 file changed +2
-0
lines changed Original file line number Diff line number Diff line change @@ -99,6 +99,7 @@ class PSPerl {
99
99
if (Test-Path ' env:PERL_MM_OPT' ) { Remove-Item env:\PERL_MM_OPT }
100
100
if (Test-Path ' env:PERL_MB_OPT' ) { Remove-Item env:\PERL_MB_OPT }
101
101
if (Test-Path ' env:PERL_LOCAL_LIB_ROOT' ) { Remove-Item env:\PERL_LOCAL_LIB_ROOT }
102
+ if (Test-Path ' env:PSPERL_CURRENT' ) { Remove-Item env:\PSPERL_CURRENT }
102
103
103
104
# Write-Output "Path to PSPerl is: $($this.rootPath)"
104
105
# Go through the PATH and remove Perl-related items
@@ -249,6 +250,7 @@ class PSPerl {
249
250
throw " $ ( $perl_install ) isn't yet installed. Try installing it." ;
250
251
}
251
252
$this.ClearEnvironment ();
253
+ $env: PSPERL_CURRENT = $perl_install ;
252
254
$env: PATH = " $ ( $this.rootPath ) ;$ ( $env: PATH ) " ;
253
255
# which perl will we be using?
254
256
[string ]$path = " $ ( $this.rootPath ) \_perls\$ ( $perl_install ) " ;
You can’t perform that action at this time.
0 commit comments