From ba620e2d1f210fc33b1c32d837ebab59548b603c Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Mon, 6 Oct 2003 16:54:22 +0000
Subject: [PATCH]   * fixed wrong define which caused the unit to be empty

---
 rtl/win32/messages.pp | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/rtl/win32/messages.pp b/rtl/win32/messages.pp
index 118c9a00ad..2c0ff86c4f 100644
--- a/rtl/win32/messages.pp
+++ b/rtl/win32/messages.pp
@@ -3,9 +3,12 @@ unit messages;
 
 interface
 
-{$DEFINE ReadInterface}
+  uses
+    windows;
+
+{$DEFINE read_interface}
 {$I messages.inc}
 
 implementation
 
-end.
+end.
\ No newline at end of file