aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/screens/UScreenSing.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/screens/UScreenSing.pas b/src/screens/UScreenSing.pas
index b0318072..3b8fda40 100644
--- a/src/screens/UScreenSing.pas
+++ b/src/screens/UScreenSing.pas
@@ -483,9 +483,9 @@ begin
try
// check if file is xml
if CurrentSong.FileName.GetExtension.ToUTF8 = '.xml' then
- success := CurrentSong.LoadXMLSong()
+ success := CurrentSong.AnalyseXML and CurrentSong.LoadXMLSong()
else
- success := CurrentSong.LoadSong();
+ success := CurrentSong.Analyse and CurrentSong.LoadSong();
except
success := false;
end;