From 2c2828e6d4899204ad2c1fe7e1b1a76d7f0544dc Mon Sep 17 00:00:00 2001
From: Radegast <jsimek.cz@gmail.com>
Date: Fri, 2 Nov 2012 17:19:44 +0000
Subject: [PATCH] inno_installer: find W:ET 2.60b installation

---
 inno_installer/etl_innoinstaller.iss | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/inno_installer/etl_innoinstaller.iss b/inno_installer/etl_innoinstaller.iss
index 92cfd3d..a7f85b5 100644
--- a/inno_installer/etl_innoinstaller.iss
+++ b/inno_installer/etl_innoinstaller.iss
@@ -82,13 +82,18 @@ begin
   // Set initial values (optional)
   InstallDataPage.SelectedValueIndex := 0; // Default: Yes
 
-  // Locate W:ET 2.60b etmain directory
+  // Let user choose the location of etmain directory
   EtmainDirPage := CreateInputDirPage(InstallDataPage.ID,
     'Select "etmain" directory inside W:ET 2.60b installation', '',
     'Select the "etmain" folder inside your Wolfenstein: Enemy Territory 2.60b installation, then click Next.',
     False, '');
   EtmainDirPage.Add('');
 
+  // Locate W:ET 2.60b etmain directory
+  if RegQueryStringValue(HKLM, 'Software\Activision\Wolfenstein - Enemy Territory', 'InstallPath', InstallPath) then begin
+    EtmainDirPage.Values[0] := InstallPath + '\etmain'
+  end;
+
   // Download W:ET data files
   itd_init;
   itd_downloadafter(wpReady);