X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_main.pas;h=9fadc1beddc6e0c68f2e36ae6ecb39f3e0693985;hp=050ee1fbea50d4e9dbc978a1f805cc21adbfd137;hb=b4b66ea803f8d896c2b2abd75108ef233030da03;hpb=2d2ce4c1770a59c3e780f3fd31249ce6043f374c diff --git a/src/game/g_main.pas b/src/game/g_main.pas index 050ee1f..9fadc1b 100644 --- a/src/game/g_main.pas +++ b/src/game/g_main.pas @@ -139,7 +139,11 @@ procedure InitPath; function IsSep (ch: Char): Boolean; begin - result := (ch = '/') or (ch = '\') + {$IFDEF WINDOWS} + result := (ch = '/') or (ch = '\'); + {$ELSE} + result := (ch = '/'); + {$ENDIF} end; function OptimizePath (dir: AnsiString): AnsiString;