From a6863b49e136eebcae4eb1d940413ec52722336f Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 30 Apr 2006 20:51:02 +0000
Subject: [PATCH]   * fixed compilation on non-Linux

git-svn-id: trunk@3393 -
---
 rtl/unix/keyboard.pp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/rtl/unix/keyboard.pp b/rtl/unix/keyboard.pp
index f2b3ee8af1..44a194b57a 100644
--- a/rtl/unix/keyboard.pp
+++ b/rtl/unix/keyboard.pp
@@ -81,6 +81,8 @@ const KbShiftUp    = $f0;
       KbShiftHome  = $f4;
       KbShiftEnd   = $f5;
 
+      double_esc_hack_enabled : boolean = false;
+
 {$ifdef Unused}
 type
    TKeyState = Record
@@ -196,7 +198,6 @@ const
 const
   oldmeta : longint = 0;
   meta : longint = 0;
-  double_esc_hack_enabled : boolean = false;
 
 var oldesc0,oldesc1,oldesc2,oldesc4,oldesc8:word;