From 89fdb71c854b2b5081e1cb5ec3e26e1bb93e3b60 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Wed, 24 Nov 2010 18:02:06 +0000 Subject: - fix: crash at startup (my fault) - fix: it was possible to add non-medley songs to the medley playlist -> crash in singscreen - updated polish language (thx to Pit33) - deactivate all elements (but not background/video) in singscreen (with "N") git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2751 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenSong.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Game/Code/Screens/UScreenSong.pas') diff --git a/Game/Code/Screens/UScreenSong.pas b/Game/Code/Screens/UScreenSong.pas index e69cfcfb..9cc87a41 100644 --- a/Game/Code/Screens/UScreenSong.pas +++ b/Game/Code/Screens/UScreenSong.pas @@ -610,7 +610,8 @@ begin if Length(PlaylistMedley.Song)=0 then MakeMedley := false; - end else if (Mode = smNormal) and (Length(getVisibleMedleyArr(msCalculated)) > 0) then + end else if (Mode = smNormal) and (CatSongs.Song[Interaction].Medley.Source>=msCalculated) and + (Length(getVisibleMedleyArr(msCalculated)) > 0) then begin MakeMedley := true; StartMedley(99, msCalculated); -- cgit v1.2.3