From d2efc76d60e18298e25058457d7c662f824dbfe5 Mon Sep 17 00:00:00 2001 From: tobigun Date: Mon, 3 Mar 2008 02:43:15 +0000 Subject: - replaced some Actual... vars with Current... - some indentation (i hope it does not cause that many conflicts) - removed some dependencies on the windows- or lclintf-units git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@894 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenPopup.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Game/Code/Screens/UScreenPopup.pas') diff --git a/Game/Code/Screens/UScreenPopup.pas b/Game/Code/Screens/UScreenPopup.pas index 628aa556..a02b08a1 100644 --- a/Game/Code/Screens/UScreenPopup.pas +++ b/Game/Code/Screens/UScreenPopup.pas @@ -71,9 +71,9 @@ begin //Hack to Finish Singscreen correct on Exit with Q Shortcut if (Display.NextScreenWithCheck = NIL) then begin - if (Display.ActualScreen = @ScreenSing) then + if (Display.CurrentScreen = @ScreenSing) then ScreenSing.Finish - else if (Display.ActualScreen = @ScreenSingModi) then + else if (Display.CurrentScreen = @ScreenSingModi) then ScreenSingModi.Finish; end; -- cgit v1.2.3