Просмотр исходного кода

Amiga, AROS, MorphOS: Define in IncludeTrailingPathDelimiter changed to HASAMIGA

git-svn-id: trunk@28548 -
marcus 11 лет назад
Родитель
Сommit
97831bed8a
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      rtl/objpas/sysutils/fina.inc

+ 1 - 1
rtl/objpas/sysutils/fina.inc

@@ -424,7 +424,7 @@ begin
   Result:=Path;
   l:=Length(Result);
   If (L=0) or not CharInSet(Result[l],AllowDirectorySeparators) then
-{$if defined(Amiga) or defined(AROS) or defined(MorphOS)}
+{$ifdef HASAMIGA}
     If (L>0) and (Result[l] <> DriveSeparator) then
 {$endif}
 {$ifdef SYSUTILSUNICODE}