From dc932985e284378165ecbd5ddbec62f734d0f190 Mon Sep 17 00:00:00 2001
From: Andreas Schneider <aksdb@gmx.de>
Date: Sun, 2 Aug 2009 18:43:32 +0200
Subject: [PATCH] - Made cedserver compile with FPC 2.2.3

---
 Server/UConfig.pas   | 6 +++---
 Server/cedserver.lpi | 7 ++++++-
 Server/cedserver.lpr | 7 +++----
 3 files changed, 12 insertions(+), 8 deletions(-)

diff --git a/Server/UConfig.pas b/Server/UConfig.pas
index bb47a58..e99d44b 100644
--- a/Server/UConfig.pas
+++ b/Server/UConfig.pas
@@ -256,13 +256,13 @@ begin
   Writeln('Configuring Paths');
   Writeln('=================');
   Write  ('map [map0.mul]: ');
-  Readln (FMap.MapFile);
+  Readln (FMap.FMapFile);
   if FMap.MapFile = '' then FMap.MapFile := 'map0.mul';
   Write  ('statics [statics0.mul]: ');
-  Readln (FMap.StaticsFile);
+  Readln (FMap.FStaticsFile);
   if FMap.StaticsFile = '' then FMap.StaticsFile := 'statics0.mul';
   Write  ('staidx [staidx0.mul]: ');
-  Readln (FMap.StaIdxFile);
+  Readln (FMap.FStaIdxFile);
   if FMap.StaIdxFile = '' then FMap.StaIdxFile := 'staidx0.mul';
   Write  ('tiledata [tiledata.mul]: ');
   Readln (FTiledata);
diff --git a/Server/cedserver.lpi b/Server/cedserver.lpi
index 26fabe4..ebdd3f4 100644
--- a/Server/cedserver.lpi
+++ b/Server/cedserver.lpi
@@ -29,7 +29,7 @@
         <PackageName Value="lnetbase"/>
       </Item1>
     </RequiredPackages>
-    <Units Count="14">
+    <Units Count="15">
       <Unit0>
         <Filename Value="cedserver.lpr"/>
         <IsPartOfProject Value="True"/>
@@ -100,6 +100,11 @@
         <IsPartOfProject Value="True"/>
         <UnitName Value="UClientHandling"/>
       </Unit13>
+      <Unit14>
+        <Filename Value="../UOLib/UStatics.pas"/>
+        <IsPartOfProject Value="True"/>
+        <UnitName Value="UStatics"/>
+      </Unit14>
     </Units>
   </ProjectOptions>
   <CompilerOptions>
diff --git a/Server/cedserver.lpr b/Server/cedserver.lpr
index 1ec6aa5..808cdd1 100644
--- a/Server/cedserver.lpr
+++ b/Server/cedserver.lpr
@@ -31,10 +31,9 @@ uses
   {$IFDEF UNIX}{$IFDEF UseCThreads}
   cthreads,
   {$ENDIF}{$ENDIF}
-  SysUtils, Classes,
-  lnetbase,
-  UConfig, UCEDServer, URadarMap, ULargeScaleOperations, UPackets,
-  UAdminHandling, UClientHandling, ULandscape, UPacketHandlers, URegions;
+  SysUtils, Classes, lnetbase, UConfig, UCEDServer, URadarMap,
+  ULargeScaleOperations, UPackets, UAdminHandling, UClientHandling, ULandscape,
+  UPacketHandlers, URegions, UStatics;
   
 {$I version.inc}