From 739ad9a6dee57375f05dcd20dc59ba2d619f11fa Mon Sep 17 00:00:00 2001
From: jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Mon, 24 Sep 2007 13:31:43 +0000
Subject: fixed song loading in Lazarus..

cant assume variables are initialized as 0 :)
in UFile "Done: byte;" was no initialized on lazarus compiler.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@431 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Menu/UMenu.pas     | 1 +
 Game/Code/Menu/UMenuText.pas | 4 +++-
 2 files changed, 4 insertions(+), 1 deletion(-)

(limited to 'Game/Code/Menu')

diff --git a/Game/Code/Menu/UMenu.pas b/Game/Code/Menu/UMenu.pas
index 16bc4ab2..291dc201 100644
--- a/Game/Code/Menu/UMenu.pas
+++ b/Game/Code/Menu/UMenu.pas
@@ -764,6 +764,7 @@ begin
   for J := 0 to Length(Text) - 1 do
     Text[J].Draw;
 
+
   //  Draw all ButtonCollections
   For J := 0 to High(ButtonCollection) do
     ButtonCollection[J].Draw;
diff --git a/Game/Code/Menu/UMenuText.pas b/Game/Code/Menu/UMenuText.pas
index d1c8b7b1..19adef03 100644
--- a/Game/Code/Menu/UMenuText.pas
+++ b/Game/Code/Menu/UMenuText.pas
@@ -237,10 +237,12 @@ var
   Text2:  string;
   I:      Integer;
 begin
-  if Visible then begin
+  if Visible then
+  begin
     SetFontStyle(Style);
     SetFontSize(Size);
     SetFontItalic(False);
+
     glColor4f(ColR*Int, ColG*Int, ColB*Int, Alpha);
 
     //If Selected Set Blink...
-- 
cgit v1.2.3