warnings suppressed

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1235 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 3 insertions, 1 deletions

diff --git a/Game/Code/Classes/UMain.pas b/Game/Code/Classes/UMain.pas
index 7e403b22..135113b5 100644
--- a/Game/Code/Classes/UMain.pas
+++ b/Game/Code/Classes/UMain.pas
@@ -984,6 +984,7 @@ procedure InitializePaths;
 
   // Initialize a path variable
   // After setting paths, make sure that paths exist
+  {$WARN SYMBOL_PLATFORM OFF}
   function initialize_path( out aPathVar : string; const aLocation : string ): boolean;
   var
     lWriteable: Boolean;
@@ -1002,12 +1003,13 @@ procedure InitializePaths;
       lWriteable := (lAttrib and faDirectory <> 0) and
                 not (lAttrib and faReadOnly  <> 0)
     end;
-    
+
     if not lWriteable then
       Log.LogError('Dir ('+ aLocation +') is Readonly', 'initialize_path');
 
     result := lWriteable;
   end;
+  {$WARN SYMBOL_PLATFORM ON}
 
 begin
   initialize_path( LogPath         , Platform.GetLogPath                             );