From 47aa66870ed6815c6564db008678fad866f398a8 Mon Sep 17 00:00:00 2001
From: jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sun, 11 Nov 2007 23:00:34 +0000
Subject: git-svn-id:
 svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1@604
 b956fd51-792f-4845-bead-9b4dfca2ff2c

---
 Game/Code/Classes/UIni.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index 5297e7e1..3a77bda4 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -1,4 +1,4 @@
-unit UIni;
+gunit UIni;
 
 interface
 uses IniFiles, ULog, SysUtils;
@@ -251,12 +251,11 @@ begin
   // Resolution
   SetLength(IResolution, 0);
   Modes := SDL_ListModes(nil, SDL_OPENGL or SDL_FULLSCREEN); // Check if there are any modes available
-  if(Assigned(Modes)) then //this should solve the biggest wine problem | THANKS Linnex (11.11.07)
-  repeat
+  while Assigned(Modes) do //this should solve the biggest wine problem | THANKS Linnex (11.11.07)
+  begin
     SetLength(IResolution, Length(IResolution) + 1);
     IResolution[High(IResolution)] := IntToStr(Modes^.w) + 'x' + IntToStr(Modes^.h);
     Inc(Modes);
-  until Modes^ = nil;
   end;
   
   // if no modes were set, then failback to 800x600
-- 
cgit v1.2.3