2023-07-14 17:48:59 +08:00
|
|
|
[CmdletBinding()]
|
|
|
|
Param(
|
|
|
|
[Parameter(Mandatory = $True, Position = 1)]
|
|
|
|
[string]$monacoWxsFile
|
|
|
|
)
|
|
|
|
|
|
|
|
$fileWxs = Get-Content $monacoWxsFile;
|
|
|
|
|
|
|
|
$fileWxs = $fileWxs -replace " KeyPath=`"yes`" ", " "
|
|
|
|
|
|
|
|
$newFileContent = ""
|
|
|
|
|
|
|
|
$componentId = "error"
|
|
|
|
$directories = @()
|
|
|
|
|
|
|
|
$fileWxs | ForEach-Object {
|
|
|
|
$line = $_;
|
|
|
|
if ($line -match "<Wix xmlns=`".*`">") {
|
|
|
|
$line +=
|
|
|
|
@"
|
|
|
|
`r`n
|
|
|
|
<?include `$(sys.CURRENTDIR)\Common.wxi?>`r`n
|
|
|
|
"@
|
|
|
|
}
|
|
|
|
if ($line -match "<Component Id=`"(.*)`" Directory") {
|
|
|
|
$componentId = $matches[1]
|
|
|
|
}
|
|
|
|
if ($line -match "<Directory Id=`"(.*)`" Name=`".*`" />") {
|
|
|
|
$directories += $matches[1]
|
|
|
|
}
|
|
|
|
if ($line -match "</Component>") {
|
|
|
|
$line =
|
|
|
|
@"
|
|
|
|
<RegistryKey Root="`$(var.RegistryScope)" Key="Software\Classes\powertoys\components">
|
|
|
|
<RegistryValue Type="string" Name="$($componentId)" Value="" KeyPath="yes"/>
|
|
|
|
</RegistryKey>
|
|
|
|
</Component>
|
|
|
|
"@
|
|
|
|
}
|
|
|
|
|
|
|
|
$newFileContent += $line + "`r`n";
|
|
|
|
}
|
|
|
|
|
|
|
|
$removeFolderEntries =
|
|
|
|
@"
|
2023-07-20 07:12:46 +08:00
|
|
|
`r`n <Component Id="RemoveMonacoSRCFolders" Guid="$((New-Guid).ToString().ToUpper())" Directory="MonacoPreviewHandlerMonacoSRCFolder" >
|
2023-07-14 17:48:59 +08:00
|
|
|
<RegistryKey Root="`$(var.RegistryScope)" Key="Software\Classes\powertoys\components">
|
|
|
|
<RegistryValue Type="string" Name="RemoveMonacoSRCFolders" Value="" KeyPath="yes"/>
|
|
|
|
</RegistryKey>`r`n
|
|
|
|
"@
|
|
|
|
|
|
|
|
$directories | ForEach-Object {
|
|
|
|
|
|
|
|
$removeFolderEntries +=
|
|
|
|
@"
|
|
|
|
<RemoveFolder Id="Remove$($_)" Directory="$($_)" On="uninstall"/>
|
|
|
|
|
|
|
|
"@
|
|
|
|
}
|
|
|
|
|
|
|
|
$removeFolderEntries +=
|
|
|
|
@"
|
|
|
|
</Component>
|
|
|
|
"@
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
$newFileContent = $newFileContent -replace "\s+(</ComponentGroup>)", "$removeFolderEntries`r`n </ComponentGroup>"
|
|
|
|
|
|
|
|
Set-Content -Path $monacoWxsFile -Value $newFileContent
|