Correct for needing third ValueName argument

Author: chyndman

src/erlang_env.iss

@@ -30,7 +30,7 @@ begin
 
   ERTSVersions := FuncRegGetSubkeyNames(HKEY_LOCAL_MACHINE, SubKeyName);
   if GetArrayLength(ERTSVersions) <> 0 then
-    Result := FuncRegQueryStringValue(HKEY_LOCAL_MACHINE, SubKeyName + '\' + GetLatestVersion(ERTSVersions));
+    Result := FuncRegQueryStringValue(HKEY_LOCAL_MACHINE, SubKeyName + '\' + GetLatestVersion(ERTSVersions), '');
 end;
 
 function GetLatestErlangPath: String;

src/registry.iss

@@ -20,10 +20,10 @@ begin
   RegGetSubkeyNames(RootKey, SubKeyName, Result);
 end;
 
-function FuncRegQueryStringValue(RootKey: Integer; SubKeyName: String): String;
+function FuncRegQueryStringValue(RootKey: Integer; SubKeyName, ValueName: String): String;
 begin
   Result := ''
-  RegQueryStringValue(RootKey, SubKeyName, Result);
+  RegQueryStringValue(RootKey, SubKeyName, ValueName, Result);
 end;
 
 procedure AppendPath(Dir: String);