added a missing routine from misc.iss (Innosetup is not used for 5.1 …

…but we are keeping it current in any event)
rykr · May 5, 2008 · 305cc0d · 305cc0d
1 parent 0ba864a
commit 305cc0d
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/Installer/misc.iss b/Installer/misc.iss
@@ -112,4 +112,10 @@ begin
   Result := Format('%sdevenv.com', [Result]);
 end;
 
+function GetVS2008Path(Param: String) : String;
+begin
+  if Not RegQueryStringValue(HKEY_LOCAL_MACHINE, 'Software\Microsoft\VisualStudio\9.0\Setup\VS', 'EnvironmentDirectory', Result) Then
+    RaiseException('Unable to locate the Visual Studio 2008 installation directory');
+  Result := Format('%sdevenv.com', [Result]);
+end;