From 0a0728b1bc280ed0e2e932b4d8f3b3b151aa62a8 Mon Sep 17 00:00:00 2001
From: jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Thu, 20 Sep 2007 06:51:40 +0000
Subject: fixed a bunch of path delimiter issues on linux build :)

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@411 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UDLLManager.pas | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'Game/Code/Classes/UDLLManager.pas')

diff --git a/Game/Code/Classes/UDLLManager.pas b/Game/Code/Classes/UDLLManager.pas
index d25efb35..ff6c16a4 100644
--- a/Game/Code/Classes/UDLLManager.pas
+++ b/Game/Code/Classes/UDLLManager.pas
@@ -42,11 +42,11 @@ var
   DLLMan: TDLLMan;
 
 const
+  DLLPath = 'Plugins';
+
   {$IFDEF win32}
-     DLLPath = 'Plugins\';
      DLLExt  = '.dll';
   {$ELSE}
-     DLLPath = 'Plugins/';
      DLLExt  = '.so';
   {$ENDIF}
 
@@ -73,7 +73,7 @@ var
   SR:     TSearchRec;
 begin
 
-  if FindFirst(DLLPath + '*' + DLLExt, faAnyFile	, SR) = 0 then
+  if FindFirst(DLLPath +PathDelim+ '*' + DLLExt, faAnyFile	, SR) = 0 then
   begin
     repeat
       SetLength(Plugins, Length(Plugins)+1);
@@ -143,7 +143,7 @@ begin
       exit;  }
 
   //Load Libary
-  hLibg := LoadLibrary(PChar(DLLPath + Filename));
+  hLibg := LoadLibrary(PChar(DLLPath +PathDelim+ Filename));
   //If Loaded
   if (hLibg <> 0) then
   begin
@@ -170,7 +170,7 @@ function TDLLMan.LoadPlugin(No: Cardinal): boolean;
 begin
   Result := False;
   //Load Libary
-  hLib := LoadLibrary(PChar(DLLPath + PluginPaths[No]));
+  hLib := LoadLibrary(PChar(DLLPath +PathDelim+ PluginPaths[No]));
   //If Loaded
   if (hLib <> 0) then
   begin
-- 
cgit v1.2.3