diff options
author | obo <obo@openoffice.org> | 2010-06-15 12:28:14 +0200 |
---|---|---|
committer | obo <obo@openoffice.org> | 2010-06-15 12:28:14 +0200 |
commit | bd9d89830ef1f33d63dfe0c10a5dd4be3dedb3c3 (patch) | |
tree | b0a6b921a272ac51740b8af5c3cd6887ab0695ec /solenv/bin/modules/installer/worker.pm | |
parent | 083577b9b8e18b933a1354f8f517eb1d68727135 (diff) | |
parent | 5ce94ca44025131ce60f0455c13ebb10baf42038 (diff) |
CWS-TOOLING: integrate CWS native305
Diffstat (limited to 'solenv/bin/modules/installer/worker.pm')
-rw-r--r-- | solenv/bin/modules/installer/worker.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/solenv/bin/modules/installer/worker.pm b/solenv/bin/modules/installer/worker.pm index e8a8f922bc41..564a8cb71da7 100644 --- a/solenv/bin/modules/installer/worker.pm +++ b/solenv/bin/modules/installer/worker.pm @@ -1054,8 +1054,7 @@ sub write_content_into_inf_file if ( $registryitem->{'Value'} ) { $value = $registryitem->{'Value'}; } if ( $value =~ /\<progpath\>/ ) { $value =~ s/\\\"/\"\"/g; } # Quoting for INF is done by double "" $value =~ s/\\\"/\"/g; # no more masquerading of '"' - $value =~ s/\<progpath\>/\%OFFICEINSTALLLOCATION\%/g; - # $value =~ s/\%OFFICEINSTALLLOCATION\%\\/\%OFFICEINSTALLLOCATION\%/g; # removing "\" after "%OFFICEINSTALLLOCATION%" + $value =~ s/\<progpath\>/\%INSTALLLOCATION\%/g; if ( $value ne "" ) { $value = "\"" . $value . "\""; } my $oneline = $regroot . "," . $subkey . "," . $valueentryname . "," . $flag . "," . $value . "\n"; |