aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/UMain.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 17:35:07 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 17:35:07 +0000
commit4a0804396809345423d596b079aed51261b8612f (patch)
tree60a137a4d5ab8a246c2ad6303691f5eb1ab426b4 /src/base/UMain.pas
parentdf0a8e7c62a4006ea7ac66ad7c0745a48a32ef24 (diff)
downloadusdx-4a0804396809345423d596b079aed51261b8612f.tar.gz
usdx-4a0804396809345423d596b079aed51261b8612f.tar.xz
usdx-4a0804396809345423d596b079aed51261b8612f.zip
prevent key input from being sent to the screen that is fading out, send it to the screen that is fading in instead.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1946 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/UMain.pas')
-rw-r--r--src/base/UMain.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/base/UMain.pas b/src/base/UMain.pas
index b8ddf346..439b0faa 100644
--- a/src/base/UMain.pas
+++ b/src/base/UMain.pas
@@ -514,7 +514,7 @@ begin
else
begin
// check if screen wants to exit
- Done := not Display.CurrentScreen^.ParseInput(Event.key.keysym.sym, Event.key.keysym.unicode, true);
+ Done := not Display.ParseInput(Event.key.keysym.sym, Event.key.keysym.unicode, true);
// if screen wants to exit
if Done then