this makes the de-dup work properly on win32 with the short name transformation.
my $interpolate = LITERAL_ENV;
my @active_lls = $class->active_paths;
+ $path = $class->ensure_dir_structure_for($path);
+
if (! $deactivating) {
if (@active_lls && $active_lls[-1] eq $path) {
exit 0 if $0 eq '-';
}
}
- $path = $class->ensure_dir_structure_for($path);
-
if ($0 eq '-') {
$class->print_environment_vars_for($path, $deactivating, $interpolate);
exit 0;