This repository was archived by the owner on May 1, 2024. It is now read-only.
File tree Expand file tree Collapse file tree 1 file changed +2
-4
lines changed Expand file tree Collapse file tree 1 file changed +2
-4
lines changed Original file line number Diff line number Diff line change @@ -66,7 +66,7 @@ Filename: "{tmp}\Output\elixir-v{code:ConstGetSelectedReleaseVersion}-setup.exe"
66
66
[Tasks]
67
67
Name : " erlang" ; Description : " Install Erlang" ; GroupDescription: " Erlang" ; Check : CheckToInstallErlang
68
68
Name : " erlang\32" ; Description : " {code:ConstGetErlangName32}" ; GroupDescription: " Erlang" ; Flags : exclusive
69
- Name : " erlang\64" ; Description : " {code:ConstGetErlangName32 }" ; GroupDescription: " Erlang" ; Flags : exclusive ; Check : IsWin64
69
+ Name : " erlang\64" ; Description : " {code:ConstGetErlangName64 }" ; GroupDescription: " Erlang" ; Flags : exclusive ; Check : IsWin64
70
70
Name : " erlpath" ; Description : " Append Erlang directory to Path environment variable" ; GroupDescription: " Erlang" ; Check : CheckToAddErlangPath
71
71
72
72
[Code]
@@ -318,7 +318,6 @@ function GetFirstReleaseMatchingRef(Releases: array of TElixirRelease; RefMatch:
318
318
var
319
319
i: Integer;
320
320
begin
321
- Result := Null;
322
321
for i := 0 to GetArrayLength(Releases) - 1 do begin
323
322
if Releases[i].Ref = RefMatch then begin
324
323
Result := Releases[i];
@@ -331,10 +330,9 @@ function GetSelectedRelease(ListBoxes: array of TNewCheckListBox; Releases: arra
331
330
var
332
331
i, j, k: Integer;
333
332
begin
334
- Result := Null;
335
333
for i := 0 to GetArrayLength(ListBoxes) - 1 do begin
336
334
for j := 0 to ListBoxes[i].Items.Count - 1 do begin
337
- if ListBoxes[i].ItemObject[j] <> Null then begin
335
+ if ListBoxes[i].ItemObject[j] <> nil then begin
338
336
Result := GetFirstReleaseMatchingRef(Releases, ListBoxes[i].ItemObject[j]);
339
337
exit;
340
338
end ;
You can’t perform that action at this time.
0 commit comments