This repository was archived by the owner on May 1, 2024. It is now read-only.
File tree Expand file tree Collapse file tree 2 files changed +1
-12
lines changed Expand file tree Collapse file tree 2 files changed +1
-12
lines changed Original file line number Diff line number Diff line change @@ -159,13 +159,6 @@ begin
159159 if CurPageID = GlobalPageSelRelease.ID then begin
160160 for i := 0 to GlobalPageSelRelease.CheckListBox.Items.Count - 1 do begin
161161 if GlobalPageSelRelease.CheckListBox.Checked[i] then begin
162- RefMatch := GlobalPageSelRelease.CheckListBox.ItemObject[i];
163- break;
164- end ;
165- end ;
166-
167- for i := 0 to GetArrayLength(GlobalElixirReleases) - 1 do begin
168- if GlobalElixirReleases[i].Ref = RefMatch then begin
169162 CacheSelectedRelease := GlobalElixirReleases[i];
170163 break;
171164 end ;
@@ -198,7 +191,7 @@ begin
198191 0 , // All choices on the same level
199192 (latest) and (ReleaseType = ' release' ), // Radio button selected by default if it's the latest release
200193 (ReleaseType <> ' incompatible' ), // Incompatible releases can't be selected
201- Ref // Pointer to release's reference object
194+ Nil
202195 );
203196
204197 if ReleaseType = ' release' then
Original file line number Diff line number Diff line change 2020 Version: String;
2121 URL: String;
2222 ReleaseType: String;
23- Ref: TObject;
2423 end ;
2524
2625// Given a filename to an elixir.csv file, return an array of Elixir releases corresponding to
5150 end else begin
5251 ReleaseType := ' incompatible' ;
5352 end ;
54-
55- // Assign this Elixir release a new reference object
56- Ref := TObject.Create();
5753 end ;
5854 end ;
5955 end else begin
You can’t perform that action at this time.
0 commit comments