From f81109f575a1e4e36d9c024f90265e01dcf2c354 Mon Sep 17 00:00:00 2001
From: k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 22 Nov 2014 21:56:46 +0000
Subject: Call LoadSong() only before playing the song. This speeds up the
 initial load because not all song contents have to be parsed on startup.
 Thanks to rudi_s.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3100 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/screens/UScreenSing.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/screens/UScreenSing.pas')

diff --git a/src/screens/UScreenSing.pas b/src/screens/UScreenSing.pas
index f26b8cf7..e69e3f56 100644
--- a/src/screens/UScreenSing.pas
+++ b/src/screens/UScreenSing.pas
@@ -770,7 +770,7 @@ begin
     if CurrentSong.FileName.GetExtension.ToUTF8 = '.xml' then
       success := CurrentSong.AnalyseXML and CurrentSong.LoadXMLSong()
     else
-      success := CurrentSong.Analyse; // and CurrentSong.LoadSong();
+      success := CurrentSong.Analyse and CurrentSong.LoadSong();
   except
     success := false;
   end;
-- 
cgit v1.2.3