From b6c095c771c540d51456ad7c6c84cee0c89d6ed4 Mon Sep 17 00:00:00 2001
From: marcus <marcus@idefix.freepascal.org>
Date: Sat, 27 Apr 2019 21:46:47 +0000
Subject: [PATCH] AROS: Intuition.library structure fixes

git-svn-id: trunk@41947 -
---
 packages/arosunits/src/intuition.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/packages/arosunits/src/intuition.pas b/packages/arosunits/src/intuition.pas
index f044082d9a..1b64365b30 100644
--- a/packages/arosunits/src/intuition.pas
+++ b/packages/arosunits/src/intuition.pas
@@ -1471,7 +1471,7 @@ type
     ViewInitX,
     ViewInitY: SmallInt;   // View initial offset values
 
-    EnableCLI: LongBool;   // CLI availability switch
+    EnableCLI: WordBool;   // CLI availability switch
 
   // printer configurations
     PrinterType: Word;     // printer type
@@ -1663,11 +1663,11 @@ type
                             Screens are then maintained in a front to back order using Screen.NextScreen  }
     Flags: LongWord;      // see definitions below
 {$ifdef AROS_BINCOMPAT}
-    MouseX,
-    MouseY: SmallInt;      // mouse position relative to View
-{$else}
     MouseY,
     MouseX: SmallInt;      // mouse position relative to View
+{$else}
+    MouseX,
+    MouseY: SmallInt;      // mouse position relative to View
 {$endif}
 
     Seconds: LongWord;     // timestamp of most current input event