diff options
author | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2011-04-25 10:53:52 +0000 |
---|---|---|
committer | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2011-04-25 10:53:52 +0000 |
commit | 3de159b0d467f57967642431f96b7d675b004b8e (patch) | |
tree | a690bb422069071e4d8c0a5c8ddf92642ba24925 /Game/Code/Screens/UScreenEditSub.pas | |
parent | ed610027abbb1ffebc8067a623f785ed48680ecc (diff) | |
download | usdx-3de159b0d467f57967642431f96b7d675b004b8e.tar.gz usdx-3de159b0d467f57967642431f96b7d675b004b8e.tar.xz usdx-3de159b0d467f57967642431f96b7d675b004b8e.zip |
added song quality check
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2829 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | Game/Code/Screens/UScreenEditSub.pas | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas index b232ff19..31196d45 100644 --- a/Game/Code/Screens/UScreenEditSub.pas +++ b/Game/Code/Screens/UScreenEditSub.pas @@ -387,6 +387,9 @@ begin if SResult then
begin
Text[TextDebug].Text := Language.Translate('INFO_FILE_SAVED');
+ if not CheckSong then
+ ScreenPopupError.ShowPopup('This song contains some syntax errors!');
+
CatSongs.Song[SongIndex] := AktSong;
end else
begin
|