From 4533ca31e118fe10f5b366a0ad449fb96b47dcc1 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Sun, 10 Apr 2011 11:30:58 +0000 Subject: discard medley tags and save relative song anyway git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2816 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenEditSub.pas | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas index 184a0a6c..6389edfb 100644 --- a/Game/Code/Screens/UScreenEditSub.pas +++ b/Game/Code/Screens/UScreenEditSub.pas @@ -370,18 +370,18 @@ begin // Save Song if SDL_ModState = KMOD_LSHIFT then begin - if (AktSong.Medley.Source = msTag) then + if (AktSong.isDuet) then begin - ScreenPopupError.ShowPopup('Medley with Relative is not supported!'); + ScreenPopupError.ShowPopup('Duet with Relative is not supported!'); Exit; end; - if (AktSong.isDuet) then + if (AktSong.Medley.Source = msTag) then begin - ScreenPopupError.ShowPopup('Duet with Relative is not supported!'); - Exit; + ScreenPopupError.ShowPopup('Medley with Relative is not supported! Medley-Tags deleted!'); end; + AktSong.Medley.Source := msNone; SResult := SaveSong(AktSong, Czesci, Path + FileName, true); //save with relative end else SResult := SaveSong(AktSong, Czesci, Path + FileName, false); -- cgit v1.2.3