aboutsummaryrefslogtreecommitdiffstats
path: root/src/screens/UScreenSong.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/screens/UScreenSong.pas')
-rw-r--r--src/screens/UScreenSong.pas7
1 files changed, 7 insertions, 0 deletions
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'):