diff --git a/solenv/bin/modules/installer/worker.pm b/solenv/bin/modules/installer/worker.pm index 02dad0e7bcb3..6b0dfb782db9 100644 --- a/solenv/bin/modules/installer/worker.pm +++ b/solenv/bin/modules/installer/worker.pm @@ -719,8 +719,16 @@ sub install_simple ($$$$$$) if ((!($dir =~ /\bPREDEFINED_/ )) || ( $dir =~ /\bPREDEFINED_PROGDIR\b/ )) { - mkdir $destdir . $onedir->{'HostName'}; - push @lines, "%dir " . $onedir->{'HostName'} . "\n"; + my $hostname = $onedir->{'HostName'}; + + # ignore '.' subdirectories + next if ( $hostname =~ m/\.$/ ); + # remove './' from the path + $hostname =~ s/\.\///g; + + # printf "mkdir $destdir$hostname\n"; + mkdir $destdir . $hostname; + push @lines, "%dir " . $hostname . "\n"; } } @@ -737,6 +745,10 @@ sub install_simple ($$$$$$) $destination =~ s/\$\$/\$/; $sourcepath =~ s/\$\$/\$/; + # remove './' from the path + $sourcepath =~ s/\.\///g; + $destination =~ s/\.\///g; + push @lines, "$destination\n"; if(-d "$destdir$destination"){ rmtree("$destdir$destination");