iiiypuk/hexchat
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix uninstaller logic

Browse Source
This commit is contained in:
Berke Viktor 2011-11-23 03:39:02 +01:00
parent abf1d817cf
commit d805d30957
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
build/xchat-wdk-x64.skel.iss
View File

@ -157,7 +157,7 @@ var
sUnInstPath: String; sUnInstPath: String;
sUnInstallString: String; sUnInstallString: String;
begin begin
sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\XChat-WDK_is1'); sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\XChat-WDK (x64)_is1');
sUnInstallString := ''; sUnInstallString := '';
if not RegQueryStringValue(HKLM, sUnInstPath, 'UninstallString', sUnInstallString) then if not RegQueryStringValue(HKLM, sUnInstPath, 'UninstallString', sUnInstallString) then
RegQueryStringValue(HKCU, sUnInstPath, 'UninstallString', sUnInstallString); RegQueryStringValue(HKCU, sUnInstPath, 'UninstallString', sUnInstallString);

2
build/xchat-wdk-x86.skel.iss
View File

@ -156,7 +156,7 @@ var
sUnInstPath: String; sUnInstPath: String;
sUnInstallString: String; sUnInstallString: String;
begin begin
sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\XChat-WDK_is1'); sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\XChat-WDK (x86)_is1');
sUnInstallString := ''; sUnInstallString := '';
if not RegQueryStringValue(HKLM, sUnInstPath, 'UninstallString', sUnInstallString) then if not RegQueryStringValue(HKLM, sUnInstPath, 'UninstallString', sUnInstallString) then
RegQueryStringValue(HKCU, sUnInstPath, 'UninstallString', sUnInstallString); RegQueryStringValue(HKCU, sUnInstPath, 'UninstallString', sUnInstallString);