From d250481c0c591dd935a08841debe41b7892ff040 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Sun, 2 May 2010 15:51:44 +0000 Subject: workaround for LCTRL+R in SongMenu: it should be changed when we have a solution for the CTRL+'A'..'Z' problem git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2331 b956fd51-792f-4845-bead-9b4dfca2ff2c --- src/screens/UScreenSong.pas | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'src') diff --git a/src/screens/UScreenSong.pas b/src/screens/UScreenSong.pas index a4fde5f6..a9aed0f1 100644 --- a/src/screens/UScreenSong.pas +++ b/src/screens/UScreenSong.pas @@ -338,6 +338,13 @@ begin Exit; end; + // ********************** + // * workaround for LCTRL+R: it should be changed when we have a solution for the + // * CTRL+'A'..'Z' problem + if (SDL_ModState = KMOD_LCTRL) and (PressedKey = SDLK_R) then + CharCode := UCS4Char('R'); + // ********************** + // check normal keys case UCS4UpperCase(CharCode) of Ord('Q'): -- cgit v1.2.3