[Mobies-commit] [commit] r3772 - UDM/trunk/InnoSetup

[ksmyth at redhat1.isis.vanderbilt.edu]

Author: ksmyth
Date: Wed Jun 29 14:34:34 2011
New Revision: 3772

Log:
Fix Udm-74: check for HKLM/Software/GME instead of %GME_ROOT%

Modified:
   UDM/trunk/InnoSetup/udm_innosetupVS2008.iss

Modified: UDM/trunk/InnoSetup/udm_innosetupVS2008.iss
==============================================================================
--- UDM/trunk/InnoSetup/udm_innosetupVS2008.iss	Tue Jun 28 11:07:34 2011	(r3771)
+++ UDM/trunk/InnoSetup/udm_innosetupVS2008.iss	Wed Jun 29 14:34:34 2011	(r3772)
@@ -314,16 +314,14 @@
 
 function CheckVersions(): Boolean;
 var
-  gme_path : String;
   oGME :  Variant;
 begin
   Result := True;
 #ifdef GMEVER
-  gme_path := GetEnv('GME_ROOT');
   /////////////////////////////////////////////////////////
   // CASE #1: No GME installed
   /////////////////////////////////////////////////////////
-  if gme_path = '' then begin
+  if not RegKeyExists(HKEY_LOCAL_MACHINE, 'Software\GME') then begin
     MsgBox('Unable to locate GME r{#GMEVER}.  Please install GME r{#GMEVER} first.', mbError, MB_OK);
     Result := False;
   /////////////////////////////////////////////////////////