diff options
author | eddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-25 20:41:08 +0000 |
---|---|---|
committer | eddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-25 20:41:08 +0000 |
commit | 7968b0878c1c13f61dddbacb603e00997af38f63 (patch) | |
tree | 601c94658ea0271a9f44d1a40284afd0d620031e /Game/Code/Screens/UScreenEditSub.pas | |
parent | 2ab5632e101af18810c288ad670ed130202605ad (diff) | |
download | usdx-7968b0878c1c13f61dddbacb603e00997af38f63.tar.gz usdx-7968b0878c1c13f61dddbacb603e00997af38f63.tar.xz usdx-7968b0878c1c13f61dddbacb603e00997af38f63.zip |
Fixed compilation on the mac.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@972 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Screens/UScreenEditSub.pas')
-rw-r--r-- | Game/Code/Screens/UScreenEditSub.pas | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas index c75661fc..1fb7bff8 100644 --- a/Game/Code/Screens/UScreenEditSub.pas +++ b/Game/Code/Screens/UScreenEditSub.pas @@ -119,13 +119,13 @@ begin If (PressedDown) then begin // Key Down // check normal keys - case WideUpperCase(CharCode)[1] of
+ case WideCharUpperCase(CharCode)[1] of 'Q': - begin
- Result := false;
- Exit;
- end;
- 'S':
+ begin + Result := false; + Exit; + end; + 'S': begin // Save Song if SDL_ModState = KMOD_LSHIFT then @@ -181,7 +181,7 @@ begin CopySentence(CopySrc, Lines[0].Current); end; end; - 'T':
+ 'T': begin // Fixes timings between sentences FixTimings; @@ -232,7 +232,7 @@ begin end; Exit; end; - // Golden Note Patch
+ // Golden Note Patch 'G': begin case Lines[0].Line[Lines[0].Current].Note[CurrentNote].NoteType of @@ -260,9 +260,9 @@ begin end; // case Exit; end; - end;
-
- // check special keys
+ end; + + // check special keys case PressedKey of SDLK_ESCAPE, SDLK_BACKSPACE : |