mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
98_Installer: Windows path compatibility
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@19254 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
8107d9c1b1
commit
8a21caf449
@ -5006,7 +5006,7 @@ sub LoadInstallStatusPerl(;$) {
|
|||||||
? $modules{$fname}{META}{version}
|
? $modules{$fname}{META}{version}
|
||||||
: 0;
|
: 0;
|
||||||
}
|
}
|
||||||
elsif ( $pkg =~ /^Win32::/ && $^O ne 'MSWin32' ) {
|
elsif ( $pkg =~ /^Win32::/ && $^O !~ /Win/ ) {
|
||||||
$pkgStatus{Perl}{pkgs}{$pkg}{status} = 'n/a';
|
$pkgStatus{Perl}{pkgs}{$pkg}{status} = 'n/a';
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
@ -5381,7 +5381,7 @@ sub __GetExtendedEnvPath {
|
|||||||
|
|
||||||
foreach my $p ( reverse @binpath ) {
|
foreach my $p ( reverse @binpath ) {
|
||||||
next unless ( $p && $p ne '' );
|
next unless ( $p && $p ne '' );
|
||||||
$p =~ s/\\/\\\/g;
|
$p =~ s/\\/\\\\/g if ($^O =~ m/Win/);
|
||||||
unshift @path, $p unless ( grep ( /^$p$/, @path ) );
|
unshift @path, $p unless ( grep ( /^$p$/, @path ) );
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user